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' MODULE FUNCTION 

‘ This REQUIRE file describes the structure of the Debug Syabot Table 
: pererores by the VAX compilers and interpreted by the VA —77 
t includes definitions for all field names and iterals used 

: building or interpreting the Debug Symbol Table (DST). 

' DISCLAIMER 

: This interface a not upperted by Digital. watts the Debug Symbol 
‘ Table interface is believed to be ycorrectty deaceib “4 here, Digital 
: does not guarantee that ail Congr’ ptions in this ss nition file are 
: correct and table aci Also le this interface is expected to be 
: reppensety stable oqress Se Digital cannot ficae**e that it 
: will not change in future releases of VAX 34 the VAX 

; compilers, or other gortuers. puoresseneet ble sdditions to this 

: interface are more Likely onen ncompatible changes, but individuals 
; and orepetzet tone, who use this interface stand some risk that their 
4 work will be partially or wholly nh ated by eure. releases of 

: VAX DEBUG or other digi tal software. Digital reserves the right to 
: make future incompatible changes to the Debug Symbol Table interface. 
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PURPOSE OF THE DEBUG SYMBOL TABLE 


The —* Symbol Table (DST) is the — table that the VAX compilers 
roduce to pass oyeye. table information to the VAX ee and to the 
AX Traceback facility. The DST is a ae ge he gg i — symbol table 

in the sense that all VAX compilers output symbol information in the 

same format, regardless of source language. This symbol information is 
emitted into the object modules produced by ohe compiler. It is then 
passed through the Linker into the executable * file that the Linker 
enerates EBUG or TRACEBACK can then retrieve the symbol information 
rom the image file. 


The purpose of the Debug Symbol Table is thus to permit the Traceback 
facility to eed a symbolic stack dump on abnormal program termination 
and to permit DEBUG to pupport fully 26 debugging. Other Digital 
software may also use the DST information for various purposes. 

To support these purposes, the genus Symbol Table represents all major 
aspects of program structure and data representation. It can represent 
modules, routines, lexical blocks, labels, and data symbols and it can 
represent all nesting retetionsh igs between such symbols. It can also 
describe Line number and source Line information. It can describe all 
data types supported | DEBUG, ree complex types such as record 
structures and enumeration types. In addition, it can describe arbi- 
trarily complex value and address computations. 


The Debug Symbol Table is solely intended to support compiled Languages, 
not interpreted languages. The DST representation assumes that source 
Lines have been compiled into VAX instructions and that those instruc- 
tions are *24 executed, not interpreted. Such DEBUG facilities as 
breakpoints and single-stepping will not work if this assumption is 
violated. Similarly, it is assumed that data objects have addresses 
that can be accessed directly when these objects are examined or depo- 
sited into. DST information is thus generated by all compilers that 
—* DEBUG supports. but not by the interpreters for languages such as 

or MUMPS. 
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GENERAL STRUCTURE OF THE OST 


This section describes the general structure of the Debug Symbol Table. 
it explains how the DST is generated by the yer tous VAX compilers, how 
t is passed along to the executable image file by the Linker, and how 
it is accesses in the image file by DEBUG or TRACEBACK. This section 
also describes in general terms how the OST is structured internally: 
how it is subdivided into modules, routines, lexical blocks, and indi- 
vidual symbols, how nesting relationships are represented, and how data 
symbols, ne he? their values and data types. are represented. The 
exact formats of the various Debug Symbol Table records and other fine- 
rained detail are described later in this definition file, not here, 
ut the coarse structure of the DST and how that structure is accessed 
are outlined in this section. 


GENERATION OF THE DST 


The Debug Symbol Table (DST) is generated by the compilers for all VAX 
Languages Supported by DEBUG. Bur ing compilation, the compiler outputs 
the DST for the module being compiled into the —22 object 
file. When the Linker is invoked, it does relocation and global-symbol 
resolution on the DST text and then outputs it into the executable image 
file. Beyond knowing what must be relocated, the Linker has no specia 
knowledge of the format or contents of the DST. Finally, the “wy 
reads the DST information from the executable image file during a debug- 
ing session, or Traceback reads it when giving a traceback in response 
o an unhandled severe exception during image execution. 


A compiler outputs DST information in the form of two kinds of object 
records, TBT records and DBT records. (See the Linker manual for a 
full description of the VAX object -onpuese accepted by the linker.) |. 
ALL “‘traceback’’ information goes into the TBT records and all ‘‘symbol’ 
information goes into the DBT records. When the user later Links using 
the plain LINK command, only the DST information in the TBT records are 
copied to the executable image file. These records contain enough in- 
formation for Traceback to give a call-stack traceback. If the user 
Links with the — command, all information in both the TBT and 
the DBT records are cop ed to the executable image file. These records 
together give all DST information needed for fyl pyapot te debugging. 
The user can also Link with LINK/NOTRACEBACK, which case no DST in- 
formation at all is copied to the executable image file. 


It is not possible to have the Linker copy the DBT records without also 
copying the TBT records; the information in the TBT records is required 
for the information in the DBT records to make sense. 


The ‘‘traceback’’ information in the TBT records includes all Module Begin 
and End DST records, all Routine Beg n and End DST records, all Lexical 
Block Begin and End DST records, and all Line Number PC-Correlation DST 
records. It aey also include Version Number DST records. All other DST 
records should be included in DBT records. 


Say 


; 
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Most VAX compilers hove a /DEBUG qualifier which in ite most generat 
form has two subqualifiers: /DEBUG= NOJTRACEBACK CNOJSYMBOLS). The 
valent to /DEBUG=( TRACEBACK, SYMBOLS); 


unadorned /DEBUG q Med is equ 

t causes all DST information to be output. /DEBUG=TRACEBACK causes 
only the traceback information (the TBT records) to be outoye by the 
compiler. /DEBUG=(NOTRACE ,NOSYMBOL) causes no DST information to be 
output at all. Finally, /6EBUG= (NOTRACE, SYMBOLS) causes all DST infor- 
met ten except Line Number PC-Correlation ah records to be output (this 
combination is Largely pointless although it saves some DST space). 
Note that the module cout tne. and lexical block information, which 
counts as traceback information, must be output if any symbol informa- 
oy since it defines the scopes within which other symbols 
are defined. 


When the Linker outputs the Debug Symbol Table to the executable image 
file, it may also output two more image sections: the Global Symbol 
Table (GST) and the Debug Module Table (DMT). These two tables are 
enerated if the LINK/DEBUG command is used, not otherwise. The Global 
ymbol Table contains records for all global gyqtote known to the Linker 
in the current user program. DEBUG uses the GST as a symbol table of 
last resort when DST information is not available, either because the 
module ge some global symbol was compiled without DST informa- 
tion being output or because the module is not set (with SET MODULE) in 
the current debugging session. The GST information is not as complete 
as the DST information for the same symbols because the GST has no type 
description (the Linker does not need to know about data types). 
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305 

306 The Debug Module Table (DMT) is an indexing structure for the DST. It 
307 contains one record for each module in the DST. This record contains 
308 a pointer to the start of the DST for the corresponding module, the size 
09 of the DST for that module, the number of PSECTs in that module, and the 
10 address ranges of all those PSECTs. The DMT allows DEBUG to initialize 
11 its Module Table and its Static Address Table without actually —* to 
31§ read through the entire DST; because the DAT is very small compared to 

$12 the DST, it can be scanned much more efficiently. 

315 The details of how the DST, the GST, and the DMT are accessed in the 

316 executable image file are explained in the next section. 


Lassa =e aetendiiacne te * 


2 
uzenm 3e3ith = “SBSSSoua28Scoceuc:saclostrecrps.reart®* (75 


i 


Here IHSSW_DSTBLKS and IHSS$SL_DSTVBN give the siz cks) ond locen 


e (in blo 
tion (Virtual Block Number) of the pebug Symbol Table est? within the 
executable image file. The fields IHS$ § TRECS and IHSS$L_GSTVBN give 
the size (in GST records) and start location (V rousl Sto . 
$s n 


the Global Symbol Table (GST). Finally, the fiel 
IHSSL_DMTVBN (in b 

Number) of the Debug Module Table (DMT). The DMT is described below. 
These field names are declared by macros in SYSSLIBRARY:LIB 5 2. The 
symbol IHD$SW_SYMDBGOFF is also defined in SYSSLIBRARY:LIB.L 32. 


Pointers to the Image Header and the Image Header Symbol Table Descrip- 
tor are declared as follows: 


IHDPTR: REF BLOCKC BYTE) 


: i : LOCATION OF THE DST WITHIN THE IMAGE FILE 

3 13 i 

5 : The Debug Hg Table is accessed through gotnter information found in 
s 1 : the executable image file header block. This 28* block contains a 
; ¢ : inter in a fixed location (1HDSW_SYMDBGOFF) which points to a small 
3 : lock Later in the header which gives the size and location of the 

: 8 4 : Deb Syabot Table (DST), the Global Symbol Table (GST), and the Debug 
3 5 : Module Table (DMT). The first part of the executable image file header 
: , looks as follows: 

° i 

3 0 ' long ; : 

; ¢ i tong } IHDSW_SYMDBGOFF 

i tong ! 
8 as ! 

: ©0338 : 

; 0339 : 

: tne : 

: 0341 : Here IHDS$W_SYMDBGOFF contains the byte offset relative to the start of 
; tk} : the header of an Image Header Symbol Table Descriptor . The Image Header 
: Beez Symbol Table Descriptor (IHS) in turn has the following format: 

: 0345 

; 0349 ! tong } IHS$L_GSTVBN : 

> ©0351 i long } IHS$W_GSTRECS IHS$W_DSTBLKS 

3 5 ' long } IHS$L_DMTVBN : 

; 22 : Long ; IHS$L_DMTBYTES : 

é : 

: i 

1 i 

’ i 

. 4 

° i 

. i 

. t 

: i 

. 1 

i 

; 
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The —y File Header in en executable image file points * the image 
Header teks Table Gover eter as describe x. ove. If bit 5 of te d 
IHDSL_LNKFLAGS in che Be neater is eet s is a ibis ima Lt i.e. 
one produced by the erisi, or later | wher, and the IHS$t DMTVBN and 
IHSSL_DMTBYTES f elas exist in “tht 95 Header Symbol Tablé fee Ks 
(If bit 5 is not set, t ‘ mage and those fields do not 
exist.) If non-zero, nS L ‘SntveN” ves the Virtual Block Number in 
the image file of the Debug Module Table (the pats Le L DRTBYTES 
then gives the size of the DMT in bytes. The nly bu wilt i 

weer i @ LINK/DEBUG; if he did not, IHSS$L oe ond IHS$L ‘OATBYTES” 
are zero. 
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The Debug Module Table $e tains one entry per module in the Debug 
8 Symbol Table (the DST). This is the format of each such DMT entry: 
91 
+ long : DST address of Module Begin DST Record 
398 long : Size in bytes of module's DST : 
397 Long Hy Unused--Must Be Zero H Number of PSECTs for module H 
244 tong : Start address of first PSECT in module H 
3 long ! Length of first PSECT in module in bytes H 
08 se H : 
04 ' H 
05 * (Two longwords per PSECT) 
of wild | 
09 long ‘ Start address of last PSECT in module H 
long : Length of Last PSECT in module in bytes : 
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Longword 0 2! ves the address relative to the start of eo DST of the 

Module Be Begin DST Record for this module. Longword 1 gives the size 

of the DS 4 bytes for the same module. Long guord ¢ ap the number 

of PSECTs in the module (i.e., the number of statical Llocated 
program sections). and this is followed by that number” of two-longword 

perce whi * give the start address and Length + A Ths of each such 

- Since the number of PSECTs cannot exceed the upper two 
bytes of longword 2 are available for future aoe eatin 


The DMT is used during ,peeus initialization to initialize DEBUG's Run- 
Time Symbol T aple and Program Static Address Table (Program SAT). 
Usi the DMT is inst taster than the alternative procedure, namely 
reading through the entire DST to p seh up th needed ° ormation. ‘the 
information in the DMT entry is enough to bu 

each module in the DST and th 
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3 dule RST Entry for 
e PSECT in —23* on Ny used to build the 
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Program SAT. The amount of RST + es gy a *2 needed —— An is 


not computable from the DMT information, but estimated by multiplying 
the DST size of each module by an appropriate scale factor. 


OVERALL STRUCTURE OF THE DST 


The Debug Symbol Table consists of a contiguous sequence of DST records. 
Each DST record contains a two-byte header which gives the length of the 
record in bytes and the type of the record. The structure of the rest 
of the record (if any? is determined by the record type. The length of 
the DST in 512-byte blocks is giver in the image file header; if the DST 
does not fill the last block, that block is zero-padded to the end. 


The Largest structural unit within the DST is the module. Each module 
represents the symbol table information of a geperetety compiled object 
module. The DST for a module always begins with a Module Begin DST rec- 
ord and ends with a Module End DST record. The Module Begin DST record 
gives the name of the module and the source Language in which it was 
written. The Module End DST record simply marks the end of the module 
and contains no other information. As noted above, if present, the 
2* Module Table (DMT) points to the Module Begin DST record of each 
module represented in the DST. DEBUG uses the DAT (if present) to lo- 
cate all modules in the DST. 


The DST as a whole thus always begins with the Module Begin DST record 
for the first module in the DST. It is followed by the symbol informa- 
tion for that module. Then comes the Module End DST record for that 
module. Immediately after that Module End DST record comes the Module 
Bogie DST record for the next module, and so on to the end of the whole 
DST, where the Module End DST record for the last module is found. The 
rest of that image file block is zero-filled to the next block boundary. 
Note that there is no break between modules in the DST. 
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NESTING WITHIN THE DST 


For most languages, the symbol table must represent a versety of nesting 
relationships. Routines are nested within modules, data symbols are 
declared within routines, and even routines are nested within rout tne ° 
Certain cote constructs, in particular record structures, contain addi- 
tional nesting relationships. In he Debug Symbol Table, such nesting 
relationships are represented by Begin-End pairs of DST records. We 
have already seen above that the largest subunit of the DST, namely the 

ule, is represented by @ Module Begin DST record and a Module End DST 
record bracketting the DST information for the module. 


This principle extends to other nesting roles tionships. The DST informa- 
tion ver @ routine is thus represented by a@ Routine Begin DST record and 
a@ Routine End DST record enclosing the DST information for all syasels 
local to or nested within phat routine. Similarly, lexical blocks (such 
as BEGIN-END blocks or their equivalents in various Sengueses? are re- 
presented by Block Begin and Block End DST records enclosing the symbol 


RRLRLERRKR RRR RRRRRRRPRR RRR RE R RR RRR RRR RRR ERR RRR RE RRR 
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blocks within one another to any eoer® (with 
the proper nesting of the correspond 
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progres 
records: 


Program Structure 


MODULE M = 
BEGIN 
VAR SYM_M1: 
VAR SYM_M2: 


ROUTINE R1 = 
BEGIN 


oO 
oo 


—5, = 


BEGIN 

VAR SYM_R21: DOUBLE; 
VAR SYM~R 2: INTEGER; 
ROUTINE R2A = 


VAR SYM pons BYTE; 
93 


AR BLK_V1: WORD; 
ROUTINE “R2BLKR = 
BEGIN 


FOO:BEGIN 
VAR FOO_V:REAL; 
END 


VAR R2BLK_V2:REAL; 
END; 


VAR BLK_V2: DOUBLE; 
END; 


END; 
VAR SYM_R23: REAL; 
END 
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DST records local to that lexical block. vee nesting of routines and 
n reason) is represented by 
ng Begin and End DST records. 


An examp : any hese clarify this notion. The following example shows a 
tious Language along the corresponding sequence of DST 


VAX-11 Bliss-3 
VSess$ouac8 coeeuG 


DST Record Sequence 


Module Begin ſ 


Data SYM_M1 (DTYPE_L) 
Data SYM_M2 (DTYPE_F) 


Routine Begin R1 


Data SYM_R11 (BOOLEAN) 
Data SYM_R12 (DTYPE_L) 
Routine End (for R1J 


Routine Begin R2 


Data SYM_R21 (DTYPE_D) 
Data SYM_R22 (DTYPE_L) 
Routine Begin R2A 


Data SYM_R2A (DTYPE_B) 
Block Begin (no name) 
Data BLK_V1 (DTYPE WwW) 
Routine Begin R2BLRR 


Block Begin FOO 
Data FOO_V (DTYPE_F) 
Block End (for FOO) 


Data R2BLK_V2 (DTYPE_F) 
Routine End (for R2BCKR) 


Data BLK_V2 (DTYPE_D) 
Block End (for no name) 


Routine End (for R2A) 


Data SYM_R23 2 F) 
Routine End (for R2v 


Module End 


M contains two aedyle=levet Sete items, 
- and two routings. R1 and R2. 


Routine R2 in ture con- 
R22, and SYM_R23) and a 


n turn contains an anonymous BEGIR-END Bleck. 
that blocks contains two local data symbols BLK_V 


and BLK_V2 and a 
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15-5e 1984 23:01: VAX-11 Bliss<-32 V4.0-742 P 2 
1 ~3007 138% 85:01:08 VE25SSDUASS: COEBUG. SRCIOSTRECRDS.REG. Io” RS 
Local routine R2BLKR, local routine R2BLKR contains a data symbol and a 
pape tee BEGIN-END block FOO, and block FOO contains one local **⁊ 
n 


Ws this nesting represented by Begin and End DST records 
the Debug Symbol Table as illustréted on the right. 


Additional nesting must be fegresented 4 data. A record (called a 
structure in some languages) is a composite data object containing some 
number of record components of various data types. A record component 
may itself be a record. In addition, some Languages allow records to 
have variants’ (as in PASCAL), which mposes additional structure that 
must be represented in the DST. 


A record type is represented by a Record Begin and Record End DST record 
pair phe medbbiy the DST records for the record components. This notion 
is illustrated by this program segment and the corresponding DST: 


Program Structure DST Record Sequence 
TYPE RECTYP = Record Begin (RECTYP) 
RECORD OF 
COMP1: INTEGER; Data COMP1 (DTYPE_L) 
COMP2: REAL; Data COMP2 (DTYPE_F) 
COMPS: DOUBLE; Data COMPS (DTYPE_D) 
END; Record End (for RECTYP) 


Here RECTYP is a record type. Each shiect of this type is a record con- 
taining three components, COMP1, COMP2, and COMP3. is structure is 
represented in the DST oY a Record Begin DST record followed by Data DST 
records for the components followed 7 a Record End DST record. The 
addresses specified in the component DST records are bit or byte offsets 
from the start of the RECTYP record as a whole. 


In this example, the Record Begin DST record for RECTYP any in fact re- 
resent either a record type or a record object. A field in the Record 
egin DST record indicates which. However, let us assume that RECTYP 

defines a record type. How do we then declare objects of that type? 

The following example illustrates how: 


Program Structure DST Record Sequence 
Data REC1 tSeptyesegc? 
TYPE RECTYP = Record Begin (RECTYP) 
RECORD OF 
COMP1: INTEGER; Data COMP) (DTYPE_L) 
COMP2: REAL; Data COMP2 ‘DTYPE_F) 
COMPS: DOUBLE; Data COMPS (DTYPE D) 
END; Record End ‘for RECTYP) 
VAR REC1: RECTYP; 
VAR REC2: RECTYP; Data REC2 (SepTypSpec) 
Type Spec DST record 


(Indirect Type Spec 


beet 3 B3eaie east f BAS eS coeaue: SRCIDSTRECRDS REGS 1 B 
pointing to RECTYP) 


Here the same record fype RECTYP is defined. Two objects of that Hd + 
are also phage Tiieat d REC2. Both data objects are cogrooesere 
— ype Speci cation 44 “records. me. a OST record must be 3 
mediately thet by a DST record that defines is symbol’s data type. 
The REC1 1 separate Type specifi cation DST record is innediatel fol loved 
by the TYP Record Begin DST recor 9: hence REC! is of the RECTYP data 
type. The REC2 Separate Type. Spec’ ! cation DST record is immediately 
followed by a lype Specificati T record. This record contains * 
—— Type spect cation that oa hy back to the Record Begin DST 
record for RECTYP. Hence REC2 is also of that record type. 


Records may be nested in the sense that a record component may itself de 
an object of some hay. —** A record. component of a record type is 
represented the s 4 other object f a record type, namely by 
eparate Type. Seocittcotten ST record. This record must be followed” 
by a Record Begin DST record or by a "ype Se Specification DST record that 
points to ° ——* Begin DST record. cord component can also be 
represented by a Record Begin DST record directly if this record is 
marked as defining an object rather than a type. 


— 
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Record variants, as found in PASCAL, introduce additional structure. 
detailed description of how variants are represented in the DST is ae 
in the section on ‘Record Structure DST Records” later in this defini- 
tion file. Here we will only give an example that illustrates the gene- 
ral scheme that is used: 


"SO OONOVES WN “OC OOVNOUSWN 0 


WWII POPIPININNININY 4 — — — ——— —2—— 


3383888 
ae ay tal 


DONC UNSW —OO0 


Program Structure DST Record Sequence 


Data REC1 {Septyes esc? 
TYPE RECTYP = Record Begin (RECTYP 
RECORD OF 


COMP1: INTE Data COMP (DTYPE_L) 
CASE TAG: BOOLEAN OF Date TAG (BOOLEAN 


Vari gat Set 
(tag et Begin = TAG) 


ana ( Variant= Value for FALSE 
COMPS: REAL; Data COMP2 (DTYPE_F) 
COMPS: DOUBLE); Data COMPS (DTYPE-D) 


TRUE: ( Variant Value for TRUE 
COMP4: INTEGER); Data COMP4 (DTYPE_L) 


END CASE; Variant Set End 
END; Record End (for RECTYP) 
VAR REC1: RECTYP; 


33233888888888888 
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Nesting is also used to describe enumeration types as found in PASCAL 
and some other Longue es. An enumeration type escribed by an Enum- 
n DST record followed by Enumeration Type Element 0S’ 
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gy Source File Correlation 
DST records may be scattered throughout the $1 for a module. Records 
such as these can be generated wherever the compiler finds it most con- 
venient to generate them. 


DATA REPRESENTATION IN THE DST 


Data Symbols are described in the DST by a variety of representations. 
Fundamentally, all such representa one give three pieces of information 
about each data symbol: its name, its address or value, and its data 
type. DEBUG needs additional information about a date symbol, in parti- 
cular its scope of declaration, but that information is implicit in the 
nesting structure of the DST as described above. 


59 records for all the enumeration Literals of the type followed by an : 

9 Enumeration Type End DST record. Any actual ob ect 8 the enumeration ; 
type must be described by a Separate Type Specification DST record. ; 

rans example illustrates what the DST for an enumeration type looks ; 

5 : 
Program Structure DST Record Sequence . 

9 Data HUE (sept yesper) : 

? TYPE COLOR = ( Enum Type Begin COLOR F 

7 Enum Type Element RED : 
re GREEN, Enum Type Element GREEN F 
067 BLUE Enum Type Element BLUE 3 
3 ); Enum Type End (COLOR) : 
7% VAR HUE: COLOR; : 
77 VAR PAINT: COLOR; Data PAINT (SepTypSpec) ; 
78 Type Spec DST record é 
oe86 Spoinehng 12° CoC BR | 
ointing to 3 

0681 — 
pegs A more detailed description is found in the section entitled ‘‘Enumera- : 
pene tion Type DST Records’ later in this definition file. : 
0686 For some DST record types, DEBUG — all nesting relationships below : 
06 the module level. Line Number PC-Correlation DST records, for example, $ 
may be scattered throughout the OST for a module. DEBUG treats all such : 

DST records as defining the Line number information for the module as a ; 

0690 whole, regardless of how they may be acestored within or outside the F 
069 routines and blocks of the module. S$ : 
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The name is given by a Counted ASCII string in the data syabol 's DST 
record. The value or address can be given by a five-byte encod ng con= 
taining one byte of corer l information and a longword address, offset, 
or yelue, However, if this five-byte encoding is not adequate to 99° 
scr be the oceress or value, escapes to t more complex value specifica- 
tion Later in the DST record are available. The data type mey be repre- 
sented by a one-byte type code, but if that is not adequate there are 
several escapes to a more complex type description elsewhere in the DST. 


SN 
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The stenderd five-byte value specification can specify an 32-bit or 
smaller Literal value, 4 oe c¢ byte address, any reg ster address, 
and any eceress hat can be formed y one indexing operation off a reg- 
ister or one . rection or both. a VAX Standard Descriptor exists 
for the symbol in user memory, the five-byte encoding can describe the 
descriptor address by any of the above means; the actual data address is 
then retrieved from the descriptor. 


The standard siverbyte value specification is adequate for the bulk of 
all data symbols. However, there are cases _ when it is inadequate. It 
cannot describe Literal values longer than 32 bits, it cannot describe 
very complex address computations, and it cannot describe bit addresses 
unless an appropriate descriptor {s available in user memory. for these 
cases, the first byte of the five-byte encoding must have one of several 
special escape values. The remaining — then contains (in most 
cases) a pointer to a more complex value specification later in the same 
DST —24 That more conp.er value sper tr gation mee consist of a VAX 
Standard Descriptor or a ‘VS-Follows’’ Value Specification. A VS-Follows 
Value Specification can, in the most complex case, contain a routine to 
be executed by DEBUG to compute the desired value or address. This rou- 
tine may even call compiler-generated thunks when the complexity of the 
address computation so requires. 
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The details of these more complex value specifications are given in the 
section entitled ‘DST Value Specifications’ Later in this definition 
file. The point being made here is simply that the DST provides a 
simple and compact value specification mechanism that is adequate for 
all simple cases, but it also provides several escapes to arbitrarily 
complex DST Value Specifications. These complex value specifications 
are capable of describing all known address and value computations 
required by the languages supported by DEBUG. 
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Data type specifications are done in a similar wer For all simple, 
atomic data types, a single type byte describes the data type of a data 
symbol. However, there are several escape mechanisms for more complex 
data types. One mechanism is to take the type information from a VAX 
Standard Descriptor found either in user memory or in the DST. Another 
is to use a Separate Type Specification DST record for the data symbol. 
The data type is then describe by a second DST record which immediately 
follows the Separate Type Specification DST record. This second record 
must be a Record Begin DST record (describing a record type) an Enume- 
ration Type Begin DST record sdescr bing an —* ype), or a Type 
Specification DST record. A type Specification DST record can describe 
any data type supported by DEBUG. t contains a DST Type Specification 
for the data type in question. This Type Specification may be an Indi- 
rect Type Specification, pointing to a DST record elsewhere in the DST 
that defines the data type. Alternatively, it may describe the desired 
data type directly and may be as complex as the data type requires. 
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DST Type Specifications are described in a separation section elsewhere 
in this definition file. The point being made here is simply that the 
simple one-byte type specification is available for simple data types. 

but several escapes to arbitrarily capes OST type specifications are 

available when the simple type specification is inadequate. 
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FIELD ACCESS MACROS 


The following macros are used a 4 hat BLISS field names for * data 
structures in the Debug Symbol Table. These pecres supply ing position, 
size, and sign-extension values when used in FIELD declarations for 
BLOCK and * CKVECTOR data structures. They are used instead of their 
numeric equivalents because ey are clearer and less error-prone. The 
various generic forms (as specified by the letters in the names) are as 


follows: 
A Materialized address 
L Longword 
wl Zero-extended he 
8 Zero-extended byte 
Vy Zero-extended bit field 
SW si peoneenaes — 
$B Sign-extended pyee 
SV Sign-extended bit field 


The ‘A’ form should be used whenever the field being defined is such 
that only the address of the field may be materialized in a structure 
reference; that is, fetch and store operations on the field are not 
valid. An example of such a field is an ASCII string. 


Each of the ‘'v'’ and ‘’SV’' forms take one or two parameters. The first 
parameter is the bit position within the longqword or byte and the 
second is the field size in bits. The secon pareneger i is hate 
f omitted, it defeuii: to 1. hus V_(5) means bit 
means the $-bit field starting at bit5 and ending at ar “pit 
ositions are counted from the low-order (least s gnificant) end of the 
ongword, starting at zero. 


This following field access macros are used in DSTRECRDS.REQ. Their 
actual definitions are found in STRUCDEF.REQ, but are shown here for 
the convenience of the reader. 


MACRO 
AL a F 39° 0 i, ' Address of a field 
Ae = B° 3 ? T ' Longword 
wv = Q, 16, i, i Word, sererextonded 
8. = 0, 8, z i erte sari on 
VI(P,S) = P, SIF RNULL(S) ZTHEN i ZELSE ' Unsigned 
Su_ = 0, 16, 12, i yore. gt Bie, SE 
S : . fF i oyte ia ed 
SV7(P,S)= P, ZIF ZNULL(S) THEN ZELSE A %, | Signed 
ie 


Bring in the field access macro definitions from STRUCDEF.L32. 
LIBRARY "LIBS:STRUCDEF.L32°; 


s-32 v4.0 P 
: (DEBUG. SRCIOSTRECRDS. REQ; 
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THE DST RECORD HEADER FORMAT 


ALL DST records have the same general format, consisting of a fixed 
two-byte header followed by zero or more fi ields whose format is 
——— by the DST record's type. This is the format of all DST 
records: 


ere eow em mn en — — ow woe mer err ere rem ec etme tren ere ene ere woe nmeer se ere rs ce + 


i byte | DST$B_LENGTH 


¢eewmoanmn ent n one wma sr ocean ne srnwocmsm 


i byte | DST$B_TYPE ; 


1 
1 
' 
' 
! 
1 
1 
1 
1 
' 
1 
1 
! 
' 
: var DSTSA_NEXT 
Zero or more additional fields depending on 
the value of the DSTSB_TYPE field ' 
: ! 
: H 
! 

1 

! 

i] 

1 

1 

Ff 


Frm nee een eee new nero an ere nee newer me nwome ner nner nm mene He ee ee mee + 


i These fields appear in all DST records. 
FIELD DSTSHEADER_FIELDS = 


DSTS$B_LENGTH =( 0, 8B. ], ! The as 1 oP of this DST record, not 
: includ ing this length byte 
DSTSB_TYPE = f  &. }- ! The type of this DST record 
DSTSA_NEXT = 1,4 The next DST record starts at this 


location plus DST$SB_LENGTH 


TES; 
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ALL supported 
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DSCSK_DTYPE 


- If t 
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data type of the ob 
@ Standard Data DST 
type value must be in the range DSTSK_LOWEST to DSTSK_HIGHEST or it 
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case, the record 
Otherwise, t 


DEBUG. 


VAX=11 BLi 
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OSTSB_TYPE 


values of the DST record type field (DST$B_TYPE) are 
alue is in the range of DSCSK_DTYPE_LOWEST to 
Code-and gives the 


is 
he 


ode denotes the type of 
s determined by type 
The type codes 
reserves for future 

5 are potentially 
does not support any 


As mentioned above, VAX Standard Type Codes can be used as DST record 


owe codes for data symbols. 
of the symbol 


The type code then 


ives the data 
ST record has 


* 


in addition to indicating that the 


Standard Data DST record format or a variant thereof. 
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ALL VAX Standard Type Codes are Listed here for convenience. 


commented out since they are actually declared in STARLET.REQ. 
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ITERAL 
! DSCSK_DTYPE_2 = 0, Unspecified (May not appear in DST). 
! DSCSK_DTYPE_V i Bit. 
! DSCSK_DTYPE_BU = ¢° Byte logical. 
' DSCSK-DTYPE—wU = 3, Word logical, 
! DSCSK_DTYPE_LU = 4, Longword logical. 
! DSCSK_DTYPE_QuU = 5, Quadword logical. 
! DSCSK_DTYPE_B J g. Byte integer. 
Bidepiet TG | Mee ier; , 
. = e 0 v e . 
: A = 5 Quadword integer. 
! DSCSK_DIYPE_F = 16, gingienorecis on floating. 
: Sate te BP = 4 Dou —— t8ten floating. 
. = — OM ex. 
BRESSHRE LIE | tepbttareteten tonotr 
; = 14, ex ring. 
! DSC$K-DTYPE-NU = 15, Numeric string, Ons tened. 
! DSCSK_DTYPE_NL = 19. Numeric string, left separate sign. 
! DSCSK_DTYPE_NLO = 17, Numeric string, cert overpunched sign. 
! DSCSK_DIYPE_WR ⸗ 8. Numeric string, right separate sign 
! DSCSK_DTYPE_NRO = 19, Numeric string, right overpunched sign 
! DSCSK_DTYPE-NZ = $0. Numeric string, zoned sign. 
! DSCSK_DTYPE_P = i, Packed decimal string. 
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9 ! DSCSK_DTYP =H 5 ¢: ' Sequence of instructions. 
9 : bite bive JEM = 25, ! Procedure entry mask. 
§ ! DSCSK_DTYPE_DSC = 26, ! Descriptor, used for arrays of 
i i dynamic strings 
4 ! DSCSK_DTYPE_OU = 25, ! Octaword logical 
5 ! DSCSK_DTYPE_O = g. ! Octaword in oper 
$ : S33 ee dae = 27, ! Double precision G floating, 64 ps 
! DSCSK_DTYPE_H = g. ' Quadruple precision floating, 128 bit 
BO» i DSCSK-DTYPE-GC = ¢9- { Double precision complex’ 6 floating 
9 ' DSCSK_DTYPE_HC = 30, | Quadtuple precision complex, H floa ing 
' DSCSK_OTYPE_CIT = 31, ! COBOL intermediate temporary 
1 ' DSCSK_DTYPE_BPV = ¢° ! Bound Procedure Value 
¢ ' DSCSK_DTYPE_BLV = 35,  ! Bound Label Value 
! DSCSK_DTYPE_vuU = 34, ! Bit Unaligned 
09 ! DSCSK_DTYPE_ADT = 35, ! Absolute Date-Time 
0935 : ⸗ 3— ! Unused (not supported by DEBUG) 
8 DSCSK_DTYPE_vT = 37, ! Varying Text 
8 : 
09 9 9 ! The next two values are used for range checking of the type values 
Seed 4 } in OST entries. They are used mainly in CASE statements. 
2006 DSCSK_DTYPE_LOWEST = 1 ! Lowest DTYPE data type we support 
Bez DSCSK_DTYPE_HIGHEST = 37; | Highest DTYPE data type we support 
0945 0 
0c? 
94 : INTERNAL TYPE CODES FOR DEBUG 
0948 : 
0949 ! 
0950 : 
83 The following definitions are used internally in DEBUG, but are not 
26 0 ; supported in the DST. They should be deleted here if they are made 
0953 0 : into standard VAX type codes declared in STARLET.REQ. These numbers 
54 8 : may change from one release of DEBUG to the next because they must 
56 0 always be larger than DSCSK_DTYPE_HIGHEST. 
5 : 
28 0 Define DEBUG-internal type codes. 
0 LITERAL 
1 DSCSK_DTYPE_A = 38. ! ASCIC Text 
§ DSCSK_DTYPE_AZ = 39, ! ASCIZ Text 
DSCSK_DTYPE_TF = 40, ! Boolean True/False (Length in bits) 
: DSCSK_DTYPE_SvV = 41, ! Signed bit-field (aligned) 
5 0 DSCSK_DTYPE_Sv = 42, ! Signed pitertelé (unaligned) 
DSCSK_DTYPE_FIXED = 45, ! Fixed b nary used for FIXED in ADA 
i and FIXED BINARY in PL/I. This 
; code is used the type conversion 
; tables in DBGEVALOP. 
! The following Literals are used as CASE statement bounds internally 
} in DEBUG for the range of DIYPE codes used. 
DBGSK_MINIMUM_DTYPE = 0 ' Lowest internal DEBUG dtype value 
DBGSK~MAXIMUM~DTYPE = 48; i! Highest internal DEBUG dtype value 
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Bn 
; i ! The —98* definition is only used internally in beeys. 3 is 
; ! a DIYPE code that is temporarily put into a Value Descriptor t 
3 1 ' tell the —_ ss expression interpreter that the Value Descriptor 
3 9 ¢ ! came from a Literal constant. It does not hove to be in the above 
: 9 ! range because it is only used during the parsing of address expres- 
: 9 ! sions. After the address expression has * — —— if the DIYPE 
3 985 is LITERAL, it is then changed to DSCSK_DTYP 
3 LITERAL 
3 4 3 DSCSK_DTYPE_LITERAL = 191; ! Value is from a Literal constant 
: 0990 
; 0991 
⸗ —83 OTHER DST TYPE CODES 
[oe 4 
; 0995 0 ‘ The tet Loutng literals are the DST otf codes Ay - than VAX Standard 
: 445] 0 ! Type Codes which can appear in DST$B vee s h indicates the format 
; 0997 0 ! the record which contains it and most ind cate the kind of object 
>; 0998 QO : being described by that record. wee * gst records are defined, the 
; 0999 0 : type code * — gned by makin —99 m e smaller and using that 
; 1000 0 ! value. The e coges 133%", g TSK ehet 1) are reserved, the idea 
3 1001 0 . being that the POTYPE are grenieocturat ty reserved to users. 
; 1006 0 : DEB —*2 all pst records whose t type.c es are not DST$K_BLI, in 
; 1003 0 : the renge from DSC$K R LOWEST to tsk. OT ype HIGHEST, or in the 
; 1004 0 ‘ range DST$K POwest TO DSTSR_HIGHEST. 
WB 
: 1007 0 i 
; 1008 O ! Define all Additional Debug Symbol Table record yee codes. Note that the 
$ ‘ pecial Cases record has code zero (for historical reasons 
1009 0 ' BLISS Special C dh d (for hi ical >». ALL 
3 + 94 3 other type codes are in the range DSTSK_LOWEST to DSTSK_HIGHEST. 
3 a 0 LITERAL 
: HF DSTSK_BLI = 0, BLISS Special Cases Record 
s 1018 90 DSTSK LOWEST = 153, i Lowest numbered DST record in this 
3 348 0 : range--used for range checking 
; 1017 0 DSTSK_VERSION = 153, ' Version Number Record 
: 3 0 DSTSK-COBOLGBL = 154, ' COBOL Global Attribute Record 
3 ©6101 DSTS$K_SOURCE = 155, ' Source File Correlation Record 
3 19 0 DSTSK-STATLINK = 136. ' Static Link Record 
; 102% DSTSK_VARVAL = 157, ! Variant Value Record 
ĩ 10 § DST$K_BOOL = 158, ‘ atents if ect of ty : æeem. 
1 : procecas one by 2 
3 1024 * order bit ¥ if TRUE 
> 1025 i low order bit = 0 if FALSE. 
- ¥ $ DSTSK_EXTRNXT = 159, i External-Is-Next Record (Obsolete) 
343. DSTSK_GLOBNXT = 160, ! Global-Is-Next record (Obsolete) 
; 10 3 DSCSK_DTYPE_UBS = 161, ! DEBUG iestete use galy Cunal igned 
531 di oe r ue (Obsolete 
ey DSTSK_PROLOG ⸗ 8 ' Prol 
s 1031 DSTSK_SEPTYP = 165, : wee. Ly 8 Specification Record 
; 1 4 DSTSK_ENUMELT = 164, ! Enumerated Type Element Record 
; 90 DSTSK_ENUMBEG = 165, ! Enumerated Type Begin Record 
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! Type End Record 
: ih DSTSR-VARBEG . 18 ; i vor hene tet Sein Record 
B —A = 168, i Variant Set End Record 
a 4 DSTSK"OVERLOAD = 1 — i Overloaded Symbol record 
a DSTSK-DEF_LNUM = 13 » ' Defin — itne Number Record 
Rm DSTSK"R (BEG = ne i Record Begin Record 
; 4 “RECEND = 172. i Record End Record 
8c Oe TER CONT IN 2 158° i Continuation Record 
488 DS TSK VAL SPEC = 17%, i Value Spe Tee fon Record 
; 1908 zut PSPEC = 175. i Type Specification Record 
Sz —A 176. alock Begin Record 
oe - r 
1945 DST SK HACK . 3 : i FosoL Hack Record (Obsolete) 
— tect : 158° i Reserved to DEBUG 
18K : = 180: | Reterved te BEBUG, 
: 104 DSTSK_ENTRY = 1 i Entry Po f ; 
; 353 — —————— ——————— on 
; 1058 DSTSKBLIFLD == 183, i BLISS Field Record 
: 198% 6 —A NUM = 1 5; i Line Number PC-Correlation Record 
: 1988 5 DS TSK CBLORL TT = 1 * Labet-or-Literal Record 
o - r 
; 1989 8 OS TSK ~hopek ° i 8; i — Begin Record 
: 198 PST ek- = 189; ' Module End Record 
: 1888 6 —A = 190; i Routine Begin Record 
: 1880 8 DS TSKTRINENG. «5 19% i Routine En ———— 
8 stipe nein SS i 28 yp Beene for range checking 
; 1964 NOTE TO DEVELOPERS: 
ee i T record number 
83 — S are reserved to users. hence 
; 1008 i DEBUG does not use: type oo = 8g teee lwo should be allocated 
: 1070 0 i by decrement ine DSTSK (Buest and using that number for the new DST record. 
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PODULE DST RECORDS 


The Debug Syagot Table for + ny separately c iled module must be 
try hin _@ Module-Begin/Module-End pair g DST records. The 
Module Begin DST record must thus be the very first DST record for 


any poperstely compiled module (i.e., any object file) and the Module 
End DST record must be the very Lest DST record for the module. Only 
one ule-Begin/Module-End pair is allowed in what the Linker sees 


The ars | atin Merle os 1 ee pair defines a syabol te scope which con- 
tains all symbols defined by DST records within that pair. The module 
has the name given in the Module Begin DST record. The language of the 
object module is also encoded in the Module Begin record. 
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THE MODULE BEGIN DST RECORD 


wre 


The Module Begin DST Becoré marks the bogiantng of 7 DST for a module. 

This DST 2 ord piso ves the name of le and the source lan- 

guage in which th ’ module was written. The woeyce Begin pst. necore,, 
first OST record of Engg compilation unit (‘module 

and it must be matched *8. @ Module End DST Record that ends the DST for 

that module. Only one Module Regia OST Record is allowed to appear in 

the DST for ea seperately compiled object module. 


This is the format of the Module Begin DST Record: 


— 
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Be } 

— 

os 5 

Py 

ta : 

rs : 

— 

ia : 

ES. : 

Pes : 

Bei. ; 

3 : 

— 1 

sg 11 

— 

1 ; byte DST$B_LENGTH : 

; uN i byte i DSTSB_TYPE (= DSTS$K_MODBEG) i 

>: 1 i byte } DST$B_MODBEG_UNUSED 

$ 9 Long Hu DSTS$L_MODBEG_LANGUAGE H 

; 18 i byte } DST$B_MODBEG_NAME 

3 1115 ! var H ‘ 

; 43 The Module Name in ASCII 

: 1118 (The name's Length is given by DST$B_MODBEG_NAME) 

; 1120 ; 
ee 

: + 5 Define the fields and size of the Module Begin DST Record. 

: 1 $ FIELD DSTSMODBEG_ FIELDS = 

; 11 § DST$B_MODBEG_UNUSED 2 . }: ' Unused--Must Be Zero 
20 DSTSL-MODBEG_LANGUAGE = s 4 oe : Lenguepe ¢ code of language in 
3 1131 : h module was written 
s 1 § DST$B8_MODBEG_NAME =(€ 7, 8 ) ' Count alti? in name counted 
eb ; Il string 

3 11 TES; 

3 1135 

3 11 LITERAL 

J >a DSTSK_MODBEG_SIZE = 8; ' Size * bytes of the fixed part of 
J CY i ule Begin DST record 
413 

> (1961 ! Define all the Language codes that may a *. ja the DSTSL_MODBEG_LANGUAGE 
; 1368 ' field of the Module Begin DST record. (Note thet DEBUG may not actually 

3 1767 : support all languages that have language codes.) 

$1945 LITERAL 

3 060-1146 DSTSK_MIN_LANGUAGE = 0, ! Smallest Language code 
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DSTSK_MACRO = 9. ! Macro 
DSTSK_FORTRAN = 1, ! Fortran 
DSTSK_BLISS J z. ' Bliss 

DSTSK_ COBOL = 3, ' Cobol 
DSTSK_BASIC = 4, ! Basic 

DSTSK_PLI = 5, ' PL/I 
DSTSK_PASCAL = g. ! Pascal 

DSTSK_C = 7, '¢ 

DSTSK_RPG = 8. ! RPG 

DSTSK"ADA = i ada 
DSTSK-UNKNOWN = 10, ! Language Unknown 
DSTSK_MAX_LANGUAGE = 10; ! Largest language code 


! Here also we define all the same benguege codes using names with the DGS 
! prefix. This prefix is used in DEBUG for historical reasons. These names 
may eventually be discarded. 


LITERAL 
DBGSK_MIN_LANGUAGE 
DBGSK-MACRO 
DBGSK_F ORTRAN 


DSTSK 
$K_MA 
bres 
$k" COBO 
$K_BAS 


— 
4s 
st 
nn 
4g 
w 
~™ 
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$i 
$k 
$n 
$K_ 
$k- 
$k- 
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@ 

oa 

* 

—* 
Ee, 
~~ 

QqQunnnnnnnnnea 


anguece Unknown 


“UNKNOWN arte i 
DBGSK_MAX_LANGUAGE = DSTSK_MAX NCANGUAGE ! Largest language code 


Language UNKNOWN requires some spec tot explanation. DEBUG supports Unknounꝰ 
lan uages with a standard set of DEBUG F tunes tionality. This standard set in- 
cludes all lan apes jncependent —— onal ity pis Mani llanflavored” Language 
eupressiens. dentifiers are assumed to al - _ Symbol 
references may include pubscripsing (using round 0 or square ta pardatheses) 
and record component selection lust ng dot-notation as in A.B.C). Most simple 
operators are allowed in language expressions. 


RANI ——— 
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3 
a 
= 
a 
2 
8 


co 
w 


—2 not Rꝛꝝꝓu suppersed. Longue e — Me intended as an escape for 
op tere wore ch do not æ4 1 ve DEBUG su By specifying es ean, 

code D DSTSL _MODBEG 42 °f eld, such languages can 

take ————— of BAS support DEBOG prov ons for unknown Linguages. I 

and when true DEBUG support is p provided, a new rk eet code for the new 

language can be allocated by incrementing DSTSK_MA NGUAGE by one and as- 

signing that language code to the new language.” 


pEGuS Srogts on ony out-of-range eee © code in ay pgute o Seats ys? record as 
being equ voter to language UNK Use of the D THAT code 
or Ad out-of “range Lenquese ce code is intended for tnterfal use b 

DEBUG's * nown= anguege | Support i not officially supported Bnd ts 
—— to possibly incompatible c n future releases of DEBUG. 


Internally, DEBUG treats the language code as a byte value. Hence any Lan- 
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: 1206 0 ! guage code above 255 is truncated to its low-order eight bits. 


uw 
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THE MODULE END DST RECORD 


The Module End DST Record must be the Last DST record in the DST for a 
compilation unit. Its sole purpose is to mark the end of the DST for 
a separately compiled object module. There can be only one Module End 
Ps} rescore per module, matching the previous Module Begin DST record. 


' 

1 

1 

1 

1 

1 

1 

Th s its format: 

‘ 

byte H DSTSB_LENGTH (= 1) ; 
} Se ee ee ee ee ee BH Ee REE RE EME DEE RE KBD Ae ENT PTE ete BP ese e na tnaaa = . 7 
byte ' DSTSB_TYPE (= DSTSK_MODEND) ; 
4 SSCA SS SSE — BHR OO eS BK — SH BSA SHEDS Ge ESE TDA Sse Been aanetDewanere sows + 
' 

Define the size in bytes of the Module End DST Record. 

LITERAL 


DSTSK_MODEND_SIZE = 2; ! Size of Module End record in bytes 


i 
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: } : ROUTINE DST RECORDS 

.. ¥§ i 

: 1 \ 

ie t+) : A routine is represented in the Debug Symbol Table by a pair of DST 
SES ¢ ; records, = ey | a@ Routine Begin DST record which is matched with a 

a 2 : Later Routine End DST record. ALL DST records between the Routine 

i : Begin and the Routine End DST records represent the symbols that are 
FH 1235 : declared in that routine or in nested routines or blocks. Nested rou- 
3 1 : tines are represented in the DST by nested Rout ine-Begin/Rout ine-End 
: 1 : pairs. Lexical blocks (BEGIN-END blocks or she like, depending on 

: 1 ! the panguage? may also be nested freely outside or inside routines, 
3 ; iB } provided all blocks and routines are properly nested. 

; 61241 : Consider the following example of nested blocks and routines. If 

2 1 ¢g ! routine Ri contains a nested routine R2 and a lexical block 81 and 

3 124 ‘ if block 81 contains routine R3 and Block 82, the DST would have the 
3 : 8 following sequence of DST records: 

: 1246 0 ' Module Begin for whole module 

: 1247 0 ! -»-module-level data DST records... 

>; 1268 0 : Routine Begin for R 

: 1249 0 ‘ »-- local data OST records for R1... 

:; 1250 0 ‘ Routine Begin for R2 

3 1251 0 : ---local data DST records for R2... 

= 26 0 ‘ Routine End for R2 

s tess ®@ : Block Begin for B1 

; 1254 0 ‘ .-e- local data DST records for 61... 

» jen : Routine Begin for R3 

3 1526 0 ‘ --- local data pst records for R3... 

3 1257 0O : Routine End for R 

; 1258 O ‘ Block Begin for Be 

; 1259 0 ‘ ---local data DST records for 82... 

; 1260 0 ‘ Block End for 62 

3 38 Block End for 61 

; 1 $6 ‘ Routine End for R1 

3 1$e7 8 Module End for whole module 

3 1568 0 : In addition to defining a symbol scope, the Routine-Begin/Rout ine-End 
2 $6 ‘ air defines the name and address range of the corresponding routine. 
$ 126 ‘ he name and start address is found in the Routine Begin DST record 
; 1268 : and the nyse Length of the routine is found in the Routine End DST 

3 1269 0 : record. t is assumed that the start address is also the entry point 
J yero 8 : to the routine. The Routine Begin record also indicates whether the 
3 61275 ; routine uses a CALLS/CALLG Linkage or a JSB/BSB Linkage. 
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} THE ROUTINE BEGIN DST RECORD 
1 J 
1 ! The Routine Begin ost record marks the 18 of a routine and the 
1 : associated *. This record contains routine’s name and start 
1 ! address and indicates whether the —B s a CALLS/CALLG Foyt ine 
1 8 : or a JSB/BSB routine. It must be matched by a Routine End DST record 
1 ; later in 8 DST, except if the language of the current module is 
1 ! MACRO. (Since MACRO routines have entry points but no well defined 
1 ! end points, the Routine End record can and must be onitsed for this 
: language. This exception applies to no other language.) 
! 8 This is the format of the Routine Begin DST record: 
; ! ; + o 
0 byte } DSTSB_LENGTH : 
1 9 byte ; DST$B_TYPE (= DSTSK_RTNBEG) : : 
3 0 byte } DSTS$V_RTNBEG_UNUSED INO_CALL! 
! 3% 0 ; long DSTSL_RTNBEG_ADDRESS i 
i T _NAM 
1 8 ! var : H 
; 99 0 The Routine Name in ASCII ' 
1301 9 (The name's Length is given by DSTSB_RTNBEG_NAME) 
1 08 0 i 
1 04 8 i] pe — — — — — — ù— — — — ene eset — eet oe tee Heo —2 
1305 ‘ 
eg 
1308 0 Define the fields and size of the Routine Begin DST record. 
: 19 0 FIELD DSTSRTNBEG. FIELDS = 
13g 0 SE TSy -RTINBEG_UNUSED = f $ V=(0. 7) 4 ' Unused--Must Be Zero 
1313 0 DSTSVIRTNBEG_NO_CALL = - V.(7, 1) J, ! This bit is set if this rou= 
1314 ! tine is invoked with a 
: + JSB 4 ase rather 8 CALS 
‘ nstru 
1 1 DSTSL_RINBEG_ADDRESS = ( 3, L. J], ' The A start address 
1318 ' and entry point adéress 
1319 DSTSB_RTNBEG_NAME 22 5 ! The count byte of the 
1320 : tine’s Counted ASCII name 
! 1 TES; 
1 § LITERAL 
1324 DSTSK_RINBEG_SIZE = 8; : j Byte size of the fixed part of the 
1325 0 Routine Begin DST record 
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THE ROUTINE END DST RECORD 


' 

i 

' 

: The Routine End DST Record marks the end of a routine’s scope in the 
; DST. It also contains the byte Length of the routine’s code. (Note 
: that Routine End DST records must be omitted for Language MACRO but 
; are ay tee for all other languages.) This is the format of the 

: Routine End DST record: 

i 

} byte : DSTSB_LENGTH (= 6) i 

; byte: DSTSB_TYPE (= DSTSK_RTNEND) ' 

4 See TO SSB SO STM OM BBB SEBO SC ZeE EDO oOE mr rE OB EB oZBeoZToBeasnerewmo2rnwasanreaa = > 

} byte H Unused (Must Be Zero) : 
long DSTSL_RTNEND_SIZE : 

i 

: Define the fields of the Routine End DST record. 

: 


IELD DSTSRTNENDFIELDS = 
DSTSL_RTNEND. SIZE =(€ 3, L. J ! The Length of the routine in bytes 


G0 00 00 09 sd dd dd dd Sd 
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LExICAL BLOCK DST RECORDS 


A “Lexical Block’’ is any programming Language construct other than a 
routine that defines @ scope within which symbols can be declared. 
What distinguishes a “block’’ from a ‘routine’, from DEBUG's point of 
view, is that a block is always entered by jumping to it or simply 
falling into it while a routine is always entered by a call instruc- 
tion of some sort. A routine has a entry gotns that can be called; 

a block does not. Hence BEGIN-END blocks in BLISS and PL/I are blocks 
and so are Paragraphs and Sections in COBOL. Subroutines, functions, 
and procedures, on the other hand, are ‘‘routines’’. 


Blocks and routines do have one thing in common, however. Both define 
syntactic units within which other syabels can be defined. The pur- 
pcse of representing blocks in the DST is to define the scopes they 
gee and to give the address ranges of the corresponding bodies 

of code. 


A lexical block is represented in the Debug Symbol Table by a pair 

of DST records, namely a Block Begin DST record which is matched with 
a later Block End DST record. ALU DST records between the Block Begin 
and the rere End DST record represent the symbols that are declare 

in that lexical block or in nested routines or blocks. Nested blocks 
are represented in the DST by properly nested Block-Begin/Block-End 
pairs. Routines and blocks may freely be nested within one another, 
veins the appropriate proper nesting of the corresponding Begin and 
End DST records. 


The start address of a block's code is given in the Block Begin DST 
record and the byte length of that code is given in the Block End 

DST record. The name of the block is given in the Block-Begin record. 
If a block has no name (which is common for BEGIN-END blocks), the 
null name is given (the name of Length zero). Blocks with null names 
cannot be explicitly referenced in DEBUG, but Line numbers within such 
blocks can be used to specify breakpoint locations or symbol scopes. 
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THE BLOCK BEGIN DST RECORD 


The Block Begin DST Record marks the began ing of a lexical block and 
the associated scope. This record contains the block's name and start 
e matched by a Block End DST record later in the 
DST. This is the format of the Block Begin DST record: 


address. It must 
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i byte | DSTSB_LENGTH ' 
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1 ' 

1 ' 

1 1 

1 ' 

1 1 

1 ! 

1 ' 

1 ' 

1 1 

14 ' 

ie 

16 ; byte; DSTSB_TYPE (= DSTSK_BLKBEG) : 

14 i byte } DST$B_BLKBEG_UNUSED 

* long { DSTS$L_BLKBEG_ADDRESS iM 

14 i byte | DST$B_BLKBEG_NAME 
! var : H 

rd The Block's Name in ASCII ‘ 

1614 : (The name's Length is given by DST$B_BLKBEG_NAME) 

141 i 

1418 ‘ 

1236 

? 1 Define the fields of the Block Begin DST record. 

16 5 9 FIELD DSTSBLKBEG. FIELDS = 

1425 DST$B_BLKBEG_UNUSED = . & : Unused=-Must Be Zero 

14 $ DSTSL™ “BLKBEG_ ADDRESS = » Be ' The block's start address 

14 0 DST$B_BLKBEG_NAME a » 5. ! The count byte of the block's 

i? : ace : Counted ASCII name 
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long 
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THE BLOCK END DST RECORD 


—* Bteck End DST Record marks the end of a lexical block's scope 
DST. It also contains the b Bree Longe of the block's code. 
+ the format of the Block End DST record 


+ eer reenzrerrc ree erceececeeceewt enw ecoeowteent ert eeteeeweeweeceweteeeowreteeeceecenzeeoee cs 


' DSTSB_LENGTH (= 6) : 


Geoceeeocceseooesooesoessosesooossscoescssosssocesooecoesocoosso ae 


: DSTSB_TYPE (= DSTSK_BLKEND) H 


PN — * 


Unused (Must Be Zero) ; 
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H DSTSL_BLKEND_SIZE ' 


eocecocecocooeessoosoooosonosoosccesosossescosoecoesceccescosses 


Define the fields of the Block End DST record. 
FIELD DSTSBLKEND_FIELDS = 


Da TSL OLKEND_SIZE =(€ 3, tL. J! The byte length of the lexical 
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This 
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DATA SYMBOL ODST RECORDS 


Data symbols are represented in the Debug syeeet Table by data DST 
records which come in several varieties. ALL such DST records give 
three pieces of information about each symbol: the data type of the 
syapet the value or address or the symbol, and the name of the 
ymbol. 


The Standard Data DST record is the simplest form of data DST symbol 
record and is used for most oreinery atomic data objects. It repre- 
sents the data type by a one=byte VAX Standard Type Code. It repre- 
sents the value or address of the oyster by a simple five-byte encoding 
capable of specifying 32-bit Literal values, absolute addresses, reg- 
ister locations, and addresses computed as offsets from a register. 
possibly inc Luding indirection. It is also possible to specify that 
the computed address is the address of a VAX Standard Descriptor for 
the data symbol. Finally, the name is represented as a Counted ASCII 
character string. 


There are several reasons why a Standard Data DST record may not be 
adequate to represent a data symbol. First, the symbol’s data type 
may be too complicated to —*2 by a one-byte type code. In this 
case, one of several available escape mechanisms must be used so that 
expanded type information can be ing iue in the symbol’s DST informa- 
tion. Second, if the symbol is a Literal (a named constant), its 
value may be too large to fit in one longword. In this case, an ex- 
panded value specification must be used. And third, if the symbol is 
@ variable, its address may be specified by a more Compl *cated compu- 
tation than can be represented in the Standard Data DST record. In 
pare ae an escape to a more complicated value specification must 
used. 
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Expanded type specifications come in three main forms: Descriptor 
Format DST records, pogerete Type Specification DST records, and 
various specialized DST records that handle various special kinds 
of data types such as record structures, enumeration types, and 
BLISS structures. 


Descriptor Format DST records are used when the data object must be 

described by a VAX Standard Descriptor and has a static address. A 

packed decimal data obiect. for xample must be described by a 
fies the object's length and scale factor. If 
i me, the Standard Data 


LESRESLSSELSARL 


öOSOOSOOOOISOSODIODOOIOSOOISDSOOSOOOOOOSOSOOOOOOSOOOOOOOOOOOOOOOOOCOOOOCOOOOOGOSOI 


nor VAX Standard Descriptors, a Separa Type Specification DST record 
must be used. n this case the OST record's tree teld indicates that 
the type specification is found is a separate DST record which imme- 
diately follows the present DST record. The DST record that Fol Lous 
must be a Type Specification, Record Begin, or Enumeration Type Begin 
OST record. These records can describe atl data types supported by 


SSLESFENLSSS 


For data types that can be described by neither 2 type codes 
e 
fi 


1 
1 
14 
Va 
14 
14 
14 
14 
14 
14 
14 
14 
14 
14 
14 
14 
V4 
Ve 
14 
V4 
14 
14 
14 
14 
14 
14 
14 
14 
14 
14 
la 
14 
14 
V6 
14 
14 
14 
14 
14 
14 
16 
14 
14 
14 
15 
13 
15 
1 

1 

1 

1 

1 

1 

1 

15 
15 


— ae 
uo 


ea 


— — 


Fi 
1$-sep-1904 33:04:98 VS35$$0UADB: CdeBUG. SRC IOS TRECROS.REG: 1 (20) | 


DEBUG in full detail. 


As mentioned above, the third deta type ‘escape’ aechenion is to use 
one of , ouster of ayes DST records that describe data symbols 
of pes al k nes 8 455 structures and fields, for example, are de- 
scribed by special DST records, as are enumeration type elements. 
These DST records will not be further descr d in this section; they 
are described elsewhere in this definition file. 


Expanded "Value Specifications’ must be used for data symbols whose 
values or addresses are too long or too complicated to be described 
by the Standard Data DST record. A D-Floating constant, for example, 
has too large a value (8 bytes) to fit in a Standard Data DST record. 
A “based variable’’ in PL/I may require a complicated computes ton or 
even a call on a compiler-generated thunk to compute the variable's 
address. for these and other cases, a Trailing Value Specification 
DST record must be used. Such a record includes a Value Specifica- 
tion which may be arbitrarily complex. 


— — — — — — — 
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Trailing Value Specification DST records are sometimes used to speci- 
fy both type and address information. An array with dynamic array 
bounds, for instance, must be described in the DST if no descriptor 
exists in user memory at run-time. A Trail ng Value Specification 
can be used to compute the entire descriptor for such an array at 
DEBUG-time. The descriptor then gives both the array address and 
type information such as the element type and the array bounds. 
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THE STANDARD DATA DST RECORD 


The Standard Data DST record is used to describe most simple scalar 
data objects = 4 integers, bee be ae numbers, and complex 
numbers. The 2 re Cpaentes by the one-byte VAX Standard 
Type Code ba — ost TYPE field. The value DSTSK_BO0L is also 
accepted; it denotes that the data symbol is a Booléan mE... 
value which is TRUE {f the loucorder bit {s set and FALSE otherw $e. 


re 2 : 

ie. : 

— 

ES : 

— 

12 

a 7 

Phy 

79 

31— The value See Sy veetton in the Standard Date DST record indicates 

; 1550 } the sy yaoi s value or address or how to compute the symbol’s address. 
; : 1 } The details are found below. 

3 : § This is the format of the Standard Data DST record: 

4 i 

Be ! byte : DSTSB_LENGTH : 

; 1559 ! byte } DSTSB_TYPE H 

3 1 60 ' Swen wowonrersoawm ama mrseewrereasreenacenr¢unamoneceut onan aus Porous eneasows wes $ 

3 130) ! byte | DSTSV_REGNUM { DISP { INDIR | DSTSV_VALKIND | 

; 1565 0 ! long } DSTS$L_VALUE : 

; 1365 i byte } DSTSB_NAME : 

: 1869 iver H 

3 1208 ' The Symbol Name in ASCII ‘ 

: 1370 8 (The name's Length is given by DSTSB_NAME) 

; 1372 9 
ce 

; 157% 

ee tl : Define the fields of the Standard Data DST record. These fields are also 

; 1378 ; used in many other DST records of similar formats. 

; 1580 FIELD DSISSTD_FIELDS = 

; 1382 DSTSB_VFLAGS = ° *0 276* (access inforaat ten) 

; «61585 DSTS$V “VALK IND = ° -2)],' How to interpret the specified value 
3 1 DSTSVIINDIRECT = ° v ( §J,°i Set if address of address is produced 
; «©1585 i y indicated computation (do an 
ch. 3S i ndirection to compute address) 
: 158 DSTS$V_DISP = ( 2, v.(3) J, ! Set if connent of DSTSL_VALUE is used 
BS 8 dis splec onens SF “att a register 
: ©1589 ite n DST —* 

—— DSTSV_REGNUM =( 2, v_(4,4)], — —12 ater use t displace- 
; «61591 ; e ad 28 

9 3 DST$L_VALUE * 3. Sage OPE Value, waddress 0 or b 

; 6159 DSTS$B_NAME >. os ' Count byte o symbol aoa field, 
3 1238 * a counted ASCI string 
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' Define all special values that may appear in the DSTSB_VFLAGS field. If o 

' of these values gopeers in that field, 99 ost. _VALUE™ Viele has some $s ecial 
! meaning indicated the special value. In oust “cases, the DSTSB_VFLAGS sub- 
' fields have no meaning. Not all of these s *f ~ values may appear in a 

' Standard Data DST record (see ne comments below), but they are all Listed 

' here for completeness. Note t ones these values (with, one exception) all have 
' the top four bits set--hence hey cannot be normal VFLAGS values since the 
REGNUM field cannot contain 15 (indicating the PC) in a normal VFLAGS value. 
i 


ITERAL 
DSTSK_VFLAGS_NOVAL = 128, A flag wich, indice es thet ne value 
s speci -@. the object 
being descr bed is at pe. This 
value Bey on only eal n a Record 
: Begin 9s X 
i This value is DST$B_VFLAGS signals a 
data item that was never 
allocated (and hence has no 
address). For ste vari PASCAL 
a 


DSTSK_VFLAGS_UNALLOC = 249, 


does not allocate variables 

DSTSK_VFLAGS_DSC = 250, ! This his in DSTSB_ VFLAGS. signals a 
; Descrtetor f Format OST record 
DSTSK_VFLAGS_TVS = 251, ! This velue n OST$B_ LAGS signals a 
‘Specttt Value Spec DST record 
DSTSK_VS_FOLLOWS = 253, wate 4 cation Follows (allowed 
a Trailing youve Spec) 
DSTSK_VFLAGS_BITOFFS = 255; 


' 
i 
i 
i 
' 
1 
1 
i 
1 
' 
} that are pot referenc 
1 
1 
' 
' 
i 
i 
i 
i 


A flag. indicating that DSTSL_VALUE 
contains a bit — bce 
only for record components) 


‘ Provided the DBG$B_VFLAGS field does not have one of the above special values, 
' the DBG ve VALKIND Field indicates what kind of value or address is computed 
; by the value computation. The possible values of this field are defined here. 


LITERAL 
DSTSK_VALKIND_LITERAL = 0, ' DSTSL_VALUE contains a Literal value 
DSTSK_VALKIND_ADDR “|e * Computer *. —— the address of 
e data ob 
DSTSK_VALKIND_DESC = 2, i Computation produces the address of a 
= X Sta Rpedere Descriptor for * 
DSTSK_VALKIND_REG = 3; Value ye an con * in the register 


whose number is in DSTSL_VALUE 


If the DSTSK_VFLAGS field does not contain one of the special values listed 
above, then Ehe computation that produces the value or address of the data 
object proceeds as follows: 


1. If the VALKIND field *22 DSTSK_VALKIND LITERAL, the symbol is a 
senesans ** value is given by thé DSTSL_QALUE field. Such constants 
can be up to 52 bits long. 
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; 1653 J @ iy the * — contains DSTSK_VALKIND_REG, the synbol is a — 
; 616546 ' ⸗ ster. The register number of that register is 

3 3 5 : given by the tt tie VALUE field. 

3 16 5 ! 3. Otherwise, the symbol is a yor table with a o senweyeroeer address. To 

; 1638 : compute thet address, the DSTSL_VALUE field is picked up. 

co ' 6. If the OSTS$V =BISP bit is set, the contents 24 the register whose reg- 
; 1661 ! ster number i iven a the DSTSV_REGNUM field is added to the value 
: 1668 picked up Toon the DSTSL_VALUE fiefd. 

3 1664 : 5. If the DSTSV_ “et py int is set, the address computed so far is treated 
$ 1665 : as the address of a pointer that “points to the actual data object. In 
r 1066 other words, an ingirece? on is done. 

; 61668 ! 6. If the value of the VALKIND field is DSTSK_VALKIND_ADDR, the address 

3 1069 computed so far is treated as the address of the data object. 

3 1671 ‘ 7. If the value of the VALKIND field is DSTSK_VALKIND pest. the address 

: 1076 ‘ computed so far is treated as the address of a VAX Standard Descriptor 
3 167 : for the data object. The actual address of the object, along with its 
3 1674 : other attributes such as type and size, must therefore be retrieved 

s 197? : from that descriptor. 

3 1879 ! As ete Googe ios ten indicates, wogeretely conat Seotes address Senputes sens 

3 1678 ' can be spec in the Standard Data DST record. for example, the address 
3 1679 ! of the second formal — er to a routine, passed Ni referents can b 

: 1680 i described by making pSTSV REGNUM 5 (2 (for register A . sis L_ VALUE = 

3; 1681 ! (to indicate an offset of Briss from AP to get at t — longword in 

: 108 ' the ar ane vector? . —88 tah = 1 (to indicate fuse “St is to be 
‘sy ' treate fon" isplacement off AP), and DST$V INDIRECT = 1 (td rr cate an 

3 1684 ! coticcct = since the argument 9— assed by reference). OSTSV_VALKIND = 

; 1685 0 'p KIND_ADDR in this case. f the parameter were ?— sed” by descrip- 

3 33 oo 4 DSTSV_VALKIND should be DST x VALKINKD_DESC, with all other 

> i fields having the same values as in the passed-by-reference case. 
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The Descriptor Format DST record is ysed when a VAX Standard 

Descriptor must be included in the DST for a static syebo! . It 

includes the descriptor directly in che OST recore r 

the name field. This record is essential cal 9 the 
$B_VFLAGS field has 


the ppg iat value DSTSK_VFLAGS DSC and - aVALUE field is 
a relative byte offset fo the VAX descriptor Latér in the record. 
This is the format: 


SSSSLERRAS 


$000 0000600006606 S SSS SSSSSS SS SS SSS SSS SSSSSSSSSSESESEEEEEESEEESS + 


Define the fields of the Descriptor Format DST record. 
IELO OSTSPSC_# IELOS = 
DSTSL_DSC_OFFS =C€C 3,L. J, 


1 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
' var : 
1 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
i 
1 
i 
i 
i 
i 
i 
i 
i 
i 
F 


4 byte : DSTSB_LENGTH : 
8 byte : DSTSB_TYPE } 
9 byte ‘ DSTSB_VFLAGS (= DSTSK_VFLAGS_DSC) H 
8 long : DSTSL_DSC_OFFS — 
byte DSTSB_NAME (also DSTSA_DSC_BASE) — 
1 ; = 
13 ' The Symbol Name i ASCII ‘ ‘ 
15 (The name's Length is given by DSTSB_NAME) ss 
3 J 
18 gece eee we te meme med pm mee mew ew em ee ee bw wm mmm wen ew ewer ween nw emer eon} . 
3 long ‘ DSCS$B_CLASS ‘ DSCSB_DTYPE H DSCSW_LENGTH rom 
; long ‘ DSCSA_POINTER H 

i var : H 

3 : Other VAX Standard Descriptor Fields ‘ 

$ depending on the descriptor class 

8 

9 beeeewwwwewe cece cece enn wow w cence ene e ween nee eeeeeeeceeee ee’ 

1 

5 


Offset in bytes to descriptor 
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' 
' from DST$A_DSC_BAS 
DSTSA_DSC_BASE =(€7, AL J] ' Descriptor starfs af this loc- 
40 : ation + DSTSL_DSC_OFFS 
41 TES; 
8 
44 ! Note that the address of the descriptor is computed as follows: 


att 
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' 
1746 : DST_RECORDCDSTSA_DSC_BASE] + .DST_RECORDCDSTSL_DSC_OFFS) 
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THE TRAILING VALUE SPECIFICATION DST RECORD 


The Lp bd Value Spec tt icetion DST record is used when an expanded 
value specification is needed to compute a 3 5 s value or 
address. It includes a Vejue Specification directly in the DST rec- 
ord right after the name field. This record is ess at FE identical 
to the Standard Data DST record except that the DST$B_VFLAGS 


SVS £~ S™ 
NOUS WOOO 


SN 


7 

is 

760 3 fewer Oma e 24 

761 i byte | DSTSB_LENGTH 

76 i byte } DSTS$B_TYPE 

764 > Preece on eee me OBE DE TE CSB SEO I IC 24 

765 i byte } DSTSB_VFLAGS (= DSTSK_VFLAGS_TVS) 

rey i long i DSTSL_TVS_OFFSET none 

769 i byte : DST$B_NAME (also DSTSA_TVS_BASE) i 

771 i var p 4 

ure The Symbol Name in ASCII ‘ 

eee (The name's Length is given by DSTSB_NAME) 
+ 


i var (eo 


SIs 


DST Value Specification 


' 
' 
' 
' 
J 
— 
— 
' 
' 
' 
' 
VSB DADE SOB E BeBe re C bene Da DBE MOD ODEO DEE oBD EDEN DemrmDeaDanmeanaae } 
‘ 
' 
‘ 
' 
' 
' 
‘ 
' 
+ 


0 


opo000 
wn 


uw 


' 
J 
— 
— 
J 
1 
— 
— 
— 
' 
J 
J 
— 
J 
J 
— 
‘ 
‘ 
— 
—4 
— 
— 
— 
— 
J 
J 
! 
' 
' 
' 
1 
J 
J 
' 
4 
‘ 
t 
— 
J 
J 
J 


i Define the fields of the Trailing Value Specification DST record. 


FIELD OSTEIVS FIELOS = 
DSTSL_TVS_OFFSET = (3, L. J, ! Offset in bytes to trailing Value Spec 
from DST$A_TVS_BASE 


' 
' 

DSTSA_TVS_BASE =(€7, A. J : Trailing Value Spec "starts at this 
: location + .DSTSL_TVS_OFFSET 


SSNS NNN SSNS 


TES; 
: vote that the address of the trailing Value Specification is computed as 
! follows: 


‘ 
' 
' 
; DST_RECORDCDST$A_TVS_BASE) * .DST_RECORDCDSTSL_TVS_OFFSET) 
' 


— — — — — — — — — — — — — — — — — — — — — — — — — — — — kk — — — — — — — — — — — — — — — — — 
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Also note that Value Specifications are described in a separate section 


— 


bates Bigg ee abe ts 


>; 1806 0 ! later in this definition file. 
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THE SEPARATE TYPE SPECIFICATION DST RECORD 


The Separate Typ¢ Specification DST record is used when the data type 
of the ** eing described is too complex to be Coser bed by a 
a one-byte type code or a VAX Standard Bescr ietor This DST record 
must be immediately followed by a Type poecst cation, Record Begin, 
or Enumeration Type Bogte DST record which describes the data type 
of the data symbol. (Only Continuation DST records may intervene.) 
The format of the Separate Type Specification DST record is essential- 
ly_identical to that of the Standard Data DST record. It may contain 
a Trailing Value Speci ticetion if necveqery to describe the symbol's 

e 


value or address. This is the format of the record: 
toaoescanemees (Se oe ee ee ee em oe we wD ee ee we Se Ow we oo weet ores aenouewszoae + 
byte H DSTSB_LENGTH i 
byte H DSTSB_TYPE (= DSTSK_SEPTYP) i 
byte H DST$B_VFLAGS H 
long H DSTSL_VALUE ‘ 
byte ‘ DSTSB_NAME H 
var H ' 
The Symbol Name in ASCII ‘ 
(The name's length is given by DSTSB_NAME) : 
——— eeecee ù—— — nw wr ewe — ee es Be BBM Be MO BZ 2 BE we DePewrwewve=z=ew 2m — ——— 
var : H 
A Trailing Value Specification or nothing, 
; depending on the value of DSTSB_VFLAGS field 
} TBR oe rem eonrnoe eee ceewoe eSeeeeeeeeeooeoeeeces See ew ee mre eee ce ae A 
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DST VALUE SPECIFICATIONS 


A DST Value Specification specifies the value or address of some symbol. 
Value Specification can occur in a number } pieces in the Debug Symbol 
Table. The simplest forms of Value soegrt cations occur in the Standard 
Data DST record. A somewhat more complicated form —— in Descriptor 
Format DST records where a VAX Standard Descriptor is included in the 
DST record to give more — address information (and type informa- 
tion). The Trailing Value Specification DST record has a simple five- 
byte Value Specification at the beginning of the record which getats to 
a more ym ey Value Specification at the end of the record. hat more 
complex Value Specification can be any kind of Value Specification, in- 
cluding the most general forms. 


In addition, Value Specifications — occur in a number of Type Speci- 
fications. In these cases, they typically generate values (as opposed 
to addresses), such as subrange bounds for a subrange data type, or they 
enerate full VAX Standard Descriptors in order to specify some sort of 
ata type. such as a dynamic array. 


1 

! 

' 

1 

' 

! 

' 

! 

1 

1 

1 

1 

1 

' 

1 

J 

1 

' 

' 

' 

' 

' 

‘ ALL Value Specifications start with one byte, the DST$B_VS_VFLAGS field. 
: In Standard Data DST records, this field and the DSTSB_VFLAGS field are 
; synonymous. If this field has one of the special values DSTSK_VFLAGS_xx 
' described in the Standard Data DST Record section above, the format of 
‘ the Value Specification depends on that value. Otherwise the VFLAGS 
: field is interpreted as a set of subfields, og DSTSV_VS_REGNUM 

: DSTSV_VS_DISP, DST$V_VS_INDIRECT, and DSTSK_VS_VALKIND. “This is also 
described in detail Tn fhe Standard Data DST Record section above. 
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STANDARD VALUE SPECIFICATIONS 


As indicated above, if the DSTSB_VS_VFLAGS field does not have a special 
value, the Value Specification is a Standard Value Specification and has 
the following structure: 


hoo cm ow ome ee cae eo OS we we HOD Ge GW GD om ee a ee we —2— es + 
' 
' 


. = + 
! byte : DSTS$V_VS_REGNUM DISP : INDIR H $V_VS_VALKIND 


‘ 
‘ 
Croce as em ammoree ee Seon se ete we mee etree er eect 2 or eo oe semana > 


i long } DSTSL_VS_VALUE 


Peeewraeoc — — — —— —— aan were ce SB esc eroOHeNrae SK oem ee Somme — —— — — — > 


i Define the fields of the various kinds of Value Specifications. Also define 
' the declaration macro. 


IELD DSTSVS_HOR_FIELDS = 
SET 


7 
o 
. 
. 
© 
. 
. 
* 
. 
& 
7 
Oo 
. 
— 
+ 
oe 
7 
e 
— 
om 
. 
Oo 
— 
— 
7 
o 
* 
zs 
— 
oO 
7 
e 
. 
e 
— 
— 
e 
2 
o 
. 
o 
. 
o 
+ 
e 
. 
eo 
. 
o 
. 
— 
J 
a 
— 
oO 
⸗ 
— 
7 
o 
~ 
. 
— 
o 
~ 
a 
. 
2 
. 
e 
. 
eo 
. 
e 
a 
o 
7 
oe 
. 
w 
. 
I 
I 
J 
a 
& 
2 
— 
. 
* 
J 
e 
. 
io 
oe 
. 
— 
IJ 
e 
oe 
a 
° 
. 
- 
e 
° 
2 
. 
. 
. 
— 


DSTSB_VS_VFLAGS * —4 ! Value-flags (access info) 
DST$V_VS_VALKIND a . V.(0,2) J, |! How to interpret the value 
DSTS$V~VS~ INDIRECT = { 0; v7(25 3, ° § Set to get indirection 


| * 
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g 1308 DSTSV_VS_DISP = » V.03) J,. ! Set for register dis Lacenent 
~~ % Ds TSV_Ve Re CMM * vV64 J i Register number for indexing 
: ©1904 DSTSL_VS_ VALUE = + + }: { Value, basi or bit offset 
3 8 DSTSL-VS_DSC_OFFS © EL Ve t. Je } Offset oxtes te to See basen” 
3 1909 DSTSA_VS_DSC_BASE =(5,A,], ; Descripto or yt ; se th s loca- 
; 1908 : on + DSTSL_VS_DSC_OFFS 
; 1909 DSTSL_VS_TVS_OFFSET ={C1i,t.], : Of tees in bytes te to yous spec 
; 1910 : from D te AS 

3 61911 DSTSA_VS_TVS_BASE =(€5,Aa,], ' Value sine, star M4 st s loca- 
; 33 + DSTSA_VS_ IVs OFFSET 
; «(191 DSTSW_VS_LENGTH 5tt,«& & : nek of Value Spec in Bytes 
; 61916 ; not counting the VFLAGS 

3 61915 : and VS_LENGTH elds 

3 IZI8 DST$B_VS_ALLOC = f > 9. 4 Allocation Indicator 

36 (991 DSTSA_VS_MATSPEC ={€ 4, AL ' Location of Materialization 

3 13i3 ’ Specification 

; «191 TES; 

; 1920 0 

; 1921 0 MACRO 

3 8 § ! DSTSVAL_SPEC = BLOCKC,BYTE] FIELD(DSTSVS_HOR_FIELDS) 2%; 

> 1924 0 

3 8 The following Literal values may appear in the DSTSB_VS_ALLOC field. 

8 1927 LITERAL 

; 1928 0 DSTSK_VS_ALLOC_STAT = 1, ' Value is static 

:; 1929 0 DSTSK_VS_ALLOC_DYN = 2; ! Value is dynamic 

4318 

33 0 ! Define the fields of the Materialization Specification. Also define the 

; 13 8 i declaration macro. 

s 9935 FLeLD DSTSMS_FIELDS = 

3 1398 SET 

a 99 0 DSTSB_MS_KIND =(€0, 8. ]. ! The kind of value produced 

: 1938 DS TSBAS-AECH et i, & de ! The mechanism whereby produced 
; 1939 DSTS$B_MS_FLAGBITS = . & ! Flag bits 

: 1940 DST$V—MS_NOE VAL = f 2. v705 1. i Pur ose of this bit not clear 
3 1941 34 G = » V0 J, ! Inclu ame 2 on call 
3 ine 8 DSTSA_MS_MECH_SP = » AL : ; onto ty of Mechanism 8 

: «6194 DSTS. MSAECCETADODR = o bo ! Routine address for sol 

3 1944 0 : compiler-generated thunk 
: ©1945 TES; 

3 ieee 

5 194 MACRO 

; Hb rg DSTSMATER_SPEC = BLOCKC BYTE) FIELD(DSTSMS_FIELDS) 2%; 

: 1950 

3 132) : The following values may appear in the DSTSB_MS_KIND field. 

3 1988 LITERAL 

; «6.1954 DSTSK_MS_BYTADDR = 1, ! The value is a byte address 

: 36.1955 DSTSK_MS_BITADDR = 2, i The vplue is a bit address (a longword 
3 1238 i byte ecgress lus a lonqword bit 
ĩ Oe i Hset rom the byte address) 

; ©1958 DSTSK_MS_BITOFFS = 3, i The value s a bit offset (normally a 
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DSTSK_MS_DSC 


-Se 21 
if-se Sep-1 


bit offset from the start “ot a 
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S a VAX standard descriptor 


for record components) 
ral value (constant) 
gister number (t As 
register sasres 


} The following values may appear in the DSTSB_MS_MECH field. 


LITERAL 
DSTSK_Ms_MECH MIN 
DSTSK"MS~MECH-RTNCALL 
DSTSK_MS_MECH_STK 
DSTSK-MS_MECH-RTN_NOFP 
DST$Kk“MS_MECH~MAX 


! Minimum code 
' Routine call on 


a compiler- 


enerated thunk 


' ost § ack Machine routine 
' Same as “1"* bu 


t no FP passed in 


' Maximum code 


Bbc 83:28:99 | Base AE toeeuc: SRCIDSTRECRDS.REG; 1" (25) ; 


1boseo- 1944 $3: oh: § "$35 SoUA2B COEBUG. SRC SRCIBSTRECRDS. reas? «265 


' 
i 
| 
| 


DESCRIPTOR VALUE SPECIFICATIONS 


If the DSTSB_VS_VFLAGS field nee he qoectal ve value DSTSK_VFLAGS_DSC, 
this is a DeScriptor Value Specification. Such a Value Specification 
contains an offset relative to the end of the Value Specification that 

points to a VAX Standard Descriptor later in the same DST record. That 
erecr ptor then contains the actual address that the Value Specifica- 
tion seeks to specify. This is thus the format: 


000000000666 SS 6666 SS SSSSS66656 68S SSE SS SSE CESSES ESSEEESEEESSESESESSES * 


— — — — — a — — et ss a — — — — — — — — — — — — 


Pie Pete S RARE Lott rs eee 


0000000000000000 ⏑o000 œ œ0o0 COSSSSOOo—— 


byte ‘ DSTSB_VS_VFLAGS (= DSTSK_VFLAGS_DSC) H 
long DSTSL_VS_DSC_OFFS jones 
var | DSTSA_VS_DSC_BASE ee 
Other Fields in DST Record = 
| EE ————— | 
var ' [cone 
VAX Standard Descriptor Giving Symbol Address 
— — — — — — —* 


The address of the VAX Standard Descriptor is computed as follows: 
DSC_PTR = VS_PTRCDSTSA_VS_DSC_BASE] + .VS_PTRCDSTSL_VS_DSC_OFFS]; 
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byte 
long 


var 


var 
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TRAILING VALUE SPEC VALUE SPECIFICATIONS 


If the DSTSB_VS_VFLAGS field has the special value DSTSK_VFLAGS_TVS, 
this is a {rSt ling Value Spec Value Specification. Such a Value 
Specification contains a pororer relative to DSTSA_VS_TVS_BASE that 
po nts to another Val Speci? cation Later in the same DST record. 
his second Value Specification is normally of the most general and 
erful form of Value Spec ticet on, namely the VS-Follows Value Spe 

fication. In effect, the Trail ng Value Spec format is a five-byte 
Value Specification (small enough ° fit in a Data DST Record) which 
pointe to @ larger Value Specification OL squaer in the same DST reco 
his larger Value Specification can be arbitrarily teres and complex 
in order to do whatever genputet ten is necessary to obtain the desire 
value, address, or descriptor. 


This is the format of the Trailing Value Spec Value Specification: 


tere ee ee ee mR ew re eet ee we ween eee ee em BED Tee eS mee ew sh 


' DSTSB_VS_VFLAGS (= DSTSK_VFLAGS_TVS) ' 


pee neon ere eet own — came oon ramen cnrnrorwwrenonece nae } 


i DSTSL_VS_TVS_OFFSET — 


DSTSA_VS_TVS_BASE 
Other Fields in DST Record 


} ceccccccceccce 


A 
t 
+ 


The Trailing Value Specification 
(Normally a DSTSK_VS_FOLLOWS Value Specification) 


0 
— — 


The address of the Trailing Value Specification is computed as follow 
TVS_PTR = VS_PTRCDSTSA_VS_TVS_BASE] + .VS_PTRCDSTSL_VS_TVS_OFFSETJ; 
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var 
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VS-FOLLOWS VALUE SPECIFICATIONS 


If the DSTSB_VS_VFLAGS field os fhe pecial yolye DSTSK_VS_FOLLOWS, 
this is a VS=Follows Value Specification. This is the most general — 
and powerful form of Value spec itication. The spec f cor on itself 
can be arbitrarily long, but it can aise do an arbitrarily complex 
computation in order to compute the desired value, address, or de- 
scriptor. This is the format of the VS-Follows Value Specification: 


meen ees Ee NR ODER Re wee Eee Heh 


' DSTSB_VS_VFLAGS (=DSTSK_VS_FOLLOWS) ' 


¢eweccee ee ee eee ee ee nee moc emote ee com somo ocean wreacewcewocaeseosewe me oceooe + 


DSTS$W_VS_LENGTH 


$06 00660066666 6SS66S S466 66S SS SS SS SSSSSSSSSSSSSSSSESEESEEOOSESESES + 


' DST$B_VS_ALLOC ' 
ù2 2 — 2 — cae mec weer ewe e emcee we ec coo o eo oc e 2 


DSTSA_VS_MATSPEC 
A Materialization Specification 
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‘ 
1 
1 
1 
1 
‘ 
' 
t 
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' 
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A VS-Follows Value Specification contains a Materialization Specifica- 
tion which indicates how the value is materialized. This specifica- 
tion indicates what kind of value is being produced, by what mechanism 
it 7 2 and in detail how it is produced. it also contains 
some flag Ss. 


The kind of value being produced can be a —8 byte address, a 64-bit 
bit address (a byte address followed by a 32-bit bit offset). a bit 
offset (relative to the start of a record--used only for record compon- 
ents), a literal value (a constant or ‘'R-value’’), a register address, 
or an actual VAX Standard Descriptor. VAX Standard Descriptors are 
mainly produced by Value Specification within Type Specifications where 
a descriptor must be built to describe a data type such as an array 
type with run-time subscript bounds. 


Values can be produced by two mechanisms. One is a routine call on a 
compiler-generated thunk. In this case, the compiler generates a rou- 
: ne in the object code ote when colt produces the desired value. 
he address of the routine is specified in the Mechanism speci fication, 
The qther mechanism is a OST Stack Machine routine. The DST Stack 
Machine is a virtual machine which DEBUG cquletes. To use it, the com- 
iler erates code for this virtual machine which, when executed at 
Eaue-t me, produces the desired value. The DST Stack Machine form of 
Mechanism Spec cation constitutes the most general and powerful form 
of value specification supported by DEBUG. 
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CALLS ON COMPILER-GENERATED THUNKS 


The Routine Call Mechanism Specification specifies the address of a 
compiler-generated routine (a@ thunk) which DEBUG can call t9 qerrere 
the desired value compyt at ion. This form of Mechanism Specification 
aust be used for PL/I SED’ variables since the address of such a 
variable can depend on the value ceturnee by a veeraget tage function. 
In this case, the Mechanism Specification consists of a single longword 
giving the address of the compiler-generated thunk to call. 


This is the format of the ng Value Specification when the Routine 


Call Mechanism Specificatio used: 

00000006006 6006680558855 S SSS SSS SSS SSS SSSSS SSS SSSSSSSSSSESSe+ 
ü TT ak ome hme at then me 
— teats tee encanta 
pa th ne ee ee ————— 
hgh, NET i ae ac NN NEE, 
byte : DSTSB_MS_MECH (= DSTSK_MS_MFCH_RTNCALL) : 
. 1 SONNE 
long } DSTSL_MS_MECH_RTNADDR : 


Pee BE eR OBE OO RE RE DE —— HOO ERE EE ESHER EOME EEE OTE + 


The called routine is Reseed the address of a vector of register values 
as its one argument. This vector contains all register value for the 
scope (call frame) in which the symbol having this Value Specification 
is declared. The vector contains the values of registers RO - R11, AP, 
FP, SP, PC, and PSL in that order. The routine is allowed to use all 
such values in its computations, but is not allowed to change the con- 
tents of the register vector. in addition, the routine is passed the 
value of FP (the Frame Pointer) in register R1. 


The value of the routine should be returned to DEBUG in register RO. 


The DSTSV_MS_DUMARG bit should be set in the DSTSB_MS_FLAGBITS field if 
the called routine expects to return a value longer than one longword. 
If DSTSV_MS_DUMARG is set, the address of an octaword (four=lon word) 
buffer is passed as the tirst argument to the called routine with the 
expectation that the routine's value will be returned to this buffer. 
The address of the register vector is then the second argument. 


— —— — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — 
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var 
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THE DST STACK MACHINE 


The DST Stack ~ is a virtual machine emulated by DEBUG. This 
machine can push and pop values gn @ stack and can perform a tere”? 
of arithmetic and Logics cat 7° erations. It can also call c va pathy ie 
generated thunks tack Machine is used when a valve 5 oe 
computed at DEBUG-t ime ae the Standard Format Value Spec ation 2 
not — one &@ compiler-generated thunk to do the whole computation 
seems undes? ra *8 In such cases, the compiler can generate a Mecha- 
ST “Specification which consists of c for the Stack Machine. At 
me wen the val in Question ts s needed, DEBUG will interpret 
of $s code until the STOP instruction is encountered. he value that 
—— on te top of the Stack Machine stack is then taken to be the 
esired value. 


The format of the whole Value Specification when a DST Stack Machine 
Mechanism Specification is used is as follows: 


ee er ore 


‘ DSTSB_VS_VFLAGS (=DSTSK_VS_FOLLOWS) ' 


$8 0088S0808S000580S0SSSSSSSSSS0S00SSSSSSSESOHSSSOOOOOROCCCEOOSCS + 


: DSTSW_VS_LENGTH H 


——————4 


DST$B_VS_ALLOC ' 


en 


' DSTSB_MS_KIND ' 


Gowoceesoccoserousssrcossneossesoeseesesssoesososecossocoeceeseso + 


‘ DSTSB_MS_MECH (= DSTSK_MS_MECH_STK) H 


$0058 — + 


: DSTSB_MS -FLAGBITS | H 


Seoceesusoovesesseseseeesousessessoo eeeeeoeeo escee se aewewornrowcnezan $+ 


DSTSA_MS_MECH_SPEC 
DST Stack Machine Routine 


Preece mete nme term reo — wm BEET OB ence woOme cere oe noun me $y 


Here the DST$B_ vs gf ise field should have the value DST$K_VS_ALLOC_DYN 
f any kind of ad Gress is computed and DSTSK_VS_ALLOC_STAT if a Literal 
value (a constant) is computed. The need for this fiéld is not clear 


since DEBUG ignores it at present. 


The stack upon which the ost Syeck Roch \ne operates consists of 256 
locations where each tocar on is @ longword. The stack are ue toward 
qne} ier addresses and nks teers lsroer addresses; 16 this regard 

t is Like the VAX call stack. A DST Stack Machine Routine c consists 
af a se ce of Stack Machine inetruct ons 2* in a STOP instruc- 
tion (DSTSK_STK_STOP). When the machine Stops. t e toe, location or 
locations on thé stack constitute the value the routine. The length 
of the value is determined by the DSTSB_MS_KIND field. 


The DST Stack Machine supports the instructions tabulated in the re- 
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mainder of this section. 
code followed by zero or 
In this Goscr ip ion, the 
pushed cell still on the s 
most recently pushed ceil 

Longword value. 


no 


Each instruction consists of a one-byte op- 
tate Copeneing on the op-code. 


Stitt 


i Define the Push Register instructions. 


re operand b 
top stack cel 
and the 

on the stack. 
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: register value on the Stack Machine stack. The register values are taken from 

' the scope (caii frame) of the symbol for which the value is being computed. 

ITERAL 
DSTSK_STK_LOW = 8. ! Lower bound for range checking 
DSTSK_STK_PUSHR = 0, ! Push the value of register RO 
DSTSK_STK_PUSHR e 3. ! Push the value of register R1 
pe TeK 31k PURE = ¢° ! Push the value of register R 
DSTSK_STK_PUSHR = 3, ! Push the value of register R 
DSTSK_STK_PUSHRS = 4, ! Push the value of register R4 
DSTSK_STK_PUSHRS = 5, ! Push the value of register R5 
DS TSK 3 TK PUSHAG 5 g. ! Push the value of register R 
DSTSK_STK_PUSHR = 7, ! Push the value of register R 
DSTSK_STK_PUSHR = 8. ! Push the value of register ng 
DSTSK_STK_PUSHR ⸗ ! Push the value of register R 
DST$K~STK~PUSHR10 = 16, i! Push the value of register R10 
DSTSK_STK_PUSHR11 = 11, ! Push the value of register R11 
DSTSK_STK_PUSHRAP = 3 ' Push the value of the A 
DSTSK_STK_PUSHRFP = 15, ! Push the value of the FP 
DSTSK_STK_PUSHRSP = 14, ! Push the value of the SP 
DSTSK_STK_PUSHRPC = 15; ! Push the value of the PC 


Define the Push Immediate instructions. These instructions are used to push 
constant values on the Stack Machine stack. The constant value to push comes | 
immediately after the instruction op-code. for the signed and unsigned in- 
structions, the value to push is zero-extended or sign-extended to 52 bits 
as appropriate. In the case of the Push Immediate Variable instruction, the 
byte after the op-code gives the byte length of the constant value to push. 
e constant value to push then follows immediately after that length byte. 
The constant value is zero-extended to she nearest longword boundary on the 
high-address end and the resulting block is pushed onto the stack. 


ITERAL 
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Defi 


16, 
7, 
18, 


4, 
5 
6; 


the Push Indirect instructions. 


cell is 
popped ¢ 
uns 


ett sre sign” 


pushed on the stack. 


e one, two, 
extended to 


82 


gned instructions, the value is 


f 
; 


: Push 
Push 
i 
i 


Puch 


Immediate Byte (signed) 
Iamediate Word ‘stgneq) 
Immediate Longword (signed) 
Immediate Variable 
Immediate Byte Unsigned 
Iamediate Word Unsigned 


For these instructions, the top stack 


our bytes at the address given by the 


i 
n 


ts and pushed on the st 
stead zero-extended to 


bits 


or the 
and 
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7 LITERAL 

7 DSTSK_STK_PUSHINB = 9. ! Push indirect Byte (signed) 

7 DSTSK_STK_PUSHINW = 21, ! Push Indirect Word (signed) 

74 DSTSK-STK_PUSHINL = 3 ! Push Indirect Longword (s gred) 

75 DSTSK_STK_PUSHINBU = 27, ! Push Indirect Byte Unsigne 

, DSTSK_STK_PUSHINWU = 28; ! Push Indirect Word Unsigned 

7 

ig ! Define the arithmetic and logical inetructions. These instruction pop the 

' top two cells on the stack, perform the indicated operation on these operands, 

; : and push the result back onto the stack. 
8 LITERAL 
84 


DSTSK_STK_ADD = 19, Add--The top two cells on the stack 
are popped from the stack and 
added together. The resulting 
sum is pushed onto the stack. 


Subtract--The second cell on the stack 


oo 
w 


29, 
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DSTSK_STK_SUB = 


DSTSK_STK_MULT 


DSTSK_STK_DIV 


DSTSK_STK_LSH 


DSTSK_STK_ROT 


is subtracted 


from the top cell. 


Both are popped from the stack. 


The resultin 


difference is then 


= 30, 


shed onto 


he stack. 


32, ! Logi 


' 
a 
' 
' 
i 


! Define the Copy and Exchange instructions. 
of the top stack cell or exchange the top two cells on the stack. 


u 
Multiply-=The top two stack cells are 
d from the stack and multi- 
The resulting product is 


then pushed onto the stack. 


quot 
stack. 
cal Shi 
cell b 


5 
by the top stack cell; por 
operands and push the ent teed 


second cell on 


Divide--The top stack cell is divided 
by the second stack cell. 
are popped from the stack. 


Both 
Their 


ent is then pushed onto the 


ft--Shift the second stack 
y the number o 


f bits given 


oth 
the stac 


Rotate--Rotate the second stack cell 


by the number of bits given by 
the top stack cell; pop both 
operands and push the rotated 


second cell on 


the stack 


These instructions make a copy 


LITERAL 
DSTSK_STK_COP = 34, ! Copy--A copy of the top stack cell 
: is pushed onto the stack 
DSTSK_STK_EXCH = 35; ! Exchange--The top two stack cells are 
: interchanged 


: Dot ing 
' contain 
! low-order byte, word, or longword of the top stack cell is stored 


@ byte which is 


the Store instructions. 


Following sh 
nterpreted as a sig 


e op-code, 


ned offset into 


hese instructions 


the stack. The 
nto the 


— — — — 
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: byte. word, or longword given by the current stack pointer plus four plus 
! the signed offset into the stack. (In short, the offset is an offset from 
! the second stack cell.) After that, the top stack cell is popped. These 


' instructions permit values to be stored into stack locations other than the 
top or second stack cell. 


' 
i 
i 
i 
i 
i 
L 
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ITERAL 
DSTSK_STK_STO_B = g. ! Store Byte into Stack 
DSTSK_STK_STO_W = 37, ! Store Word into Stack 
DSTSK_STK_STO_L = 38; ! Store Longword into Stack 


' Define the Pop instruction. This instruction staply pops the top stack cell, 
meaning that the top stack cell is removed from the stack and discarded. 


LITERAL 
DSTSK_STK_POP = 39; ! Pop Top Stack Cell 


! Define the Stop instruction. This instruction stops the DST Stack Machine and 
! is required at the end of every DST Stack Machine routine. Whatever value is 
' Left at the top of the stack when the Stop instruction is executed is taken to 
' be the value of the Stack Machine routine. This value may be a longword (a 

‘ oyte address, for example), two Longuords (byte address and bit offset), any 

' size Literal value (an H-F loating literal, for instance), or a full VAX Stan- 
: dard Descriptor, depending on the value of the DSTSB_MS_KIND field. 

L 


LITERAL 
DSTSK_STK_STOP = 23; ! Stop the Stack Machine 


Define the Routine Call instructions. These instructions call a compiler- 
enerated routine (a thunk) whose address is piven by the top stack cell. 
efore the call actually occurs, the top stack cell is penpec. The value 

that is returned by the thunk is then pushed onto the stack. 


WW 
MUMMNVIMIUIUIUIUT 


UNO OONOVE WN ODNOUES WO 0M 


rd A 


The Routine Call instruction works as follows. The address of the thunk to 
to be called is taken from the top stack cell. The top cell is then popped. 
The thunk, which is called with a CALL instruction, gets two arguments. The 
first argument is the address of a vector of e Speci values for the scope 


w 


(call frame) of the symbol to which this Value Specification belongs. This 
vector contains the values of registers RO - R11, AP, FP, SP, PC, and PSL in 
that order; the called thunk is free to read any value it wants from this 
vector but mex not store into it. The second parameter is a pointer to the 

top of the DST Stack Machine stack after the thunk address has been popped. 

A Stack Machine routine gen thus compute arguments to the thunk and push them 
on the stack before push ng the thunk address ong calling the thunk. In 
addition, the value of FP in the syasot $ scope is passed to the thunk in 
register R1, The routine's value is expected to be returned in register RO. 
This value is pushed onto the stack. 


The Routine Call With Alternate Return instruction works this same way except 
' that the address of an octaword buffer (4 longwords) is passed to the thunk 
! as the first orgutent. with the register vector being the second argument and 
he stack address being the third argument. In this cage. the routine value 
S expected to be returned to the octaword buffer, not in register RO. The 
whole octaword buffer is then pushed onto the stack. 


So 
no 
öOOOSOSOOSOOOIOIDIDOOIOSOIOSOISOIOSOIOSVSOOIOOSOOOOOOOOOCOOOOOOOOOSOOOGDO 
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DSTSK_STK_RTNCALL * 49. ! Routine Call (velue returned in RO) 
DSTSK_STK_RTNCALL_ALT = 41, ! Routine Call With Alternate Return 
DSTSK_STK_RTN_NOFP = 44; ! Routine Call = no FP passed in 


! Define the Push Record Address instructions. These instructions push the 

' address of the outer-most or inner-most record structure for which the cur- 
' rent symbol is a record component. ower are used for constructing VAX Stan- 
! dard Descriptors on the Stack Machine stack when some part of the descriptor 
' depends on some other component of the same record. In PL/I, for instance, 
! the subscript bounds of an array component of a record may depend on another 
! component of that record. In such cases, the only way to get the address of 


1 
1 
1 
1 
1 
1 
1 
1 
Address instructions. The Push Outer Record Address instruction pushes the 
i] 
1 
1 
L 


38 8 ! that other component in the current record is to use one of the Push Record 
0 ' address of the outer-most record of which the current symbol is a component 
01 0 ! while the Push Inner Record Address instruction pushes the address of the 
6g ! inner-most record of which the current symbol is a component. 
04 0 LITERAL 
0 DSTSK_STK_PUSH_OUTER_REC = $: ! Push Outer Record Address 
rey 8 DSTSK_STK_PUSH_INNER_REC = 43; ! Push Inner Record Address 
408 0 
2409 0 ! Define the highest op-code value accepted by the DST Stack Machine. This 
re | 8 value is used for op-code range checking. 
aig 0 LITERAL 
Sela ° DSTSK_STK_HIGH = 44;  ! Upper bound for range checking 
2415 0 
2416 0 ! END OF VALUE SPECIFICATION DESCRIPTION. 


j 
j 
| 
| 
j 


— — 
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; ret : THE TYPE SPECIFICATION DST RECORD 
; ci ! 
; 421 i The Type Specification DST record gives the most general data type 
$ 4 § , description available in the — Symbol Table. It contains the 
; 4 : name of the data type Sotng described 4 a DST Type Specification 
; 426 : that describes the type. The type name is used in languages where 
3 425 data “rere can be named, such as PASCAL. If no type name exists, 
; 4 § : the null name (the name of zero length) is specified in this record. 
3 4 : DST Type Specifications are described in detail in the next section 
: ; 3 of this definition file. 
: 450 i Type Specification DST records either immediately follow Separate 
s 431 : Type Specification DST records or are pointed to by Indirect Type 
: 4 ¢ : spect? cations or Novel Length Type Specifications elsewhere in 
3 ? 8 the DST for the current module. 
; : 5 8 ! This is the format of the Type Specification DST record: 
: 26 0 
3 4 ! teerereeccr mem n ence encoe san eer araer mr nwenre cease ocean ce eeeeecee woeomeaceaeacase + 
3 439 0 ' byte : DSTSB_LENGTH 
3 440 0 ' tee eeeecee SSBB SE SOMO BT De SESE Tse OSE Sere RECS OO ESET oe Me oc oe aw } 
3 rt 8 } byte ; DSTSB_TYPE (= DSTSK_TYPSPEC) i 
P4 3 42222— —— — — am — — — Seer wont ee ese Dee eo mw wo ee a i ——2— 
; 443 0 ' byte } DST$B_TYPSPEC_NAME 
3 444 0 ' esses ses ee SSO Be PEERED ESSE BER OA ORE DOT aMBenaes Se ee enon enneaa = + 
; 445 0 ' var : H 
3 rr 8 } The Type Name in ASCII 
: 448 0 ; ; (The name's Length is given by DST$B_TYPSPEC_NAME) 
Sa ea 
4 451 0 ‘ 22— eo mee ee me ee Se sf oR SS DO Be OBE Bc eE DBD ewreme eae ese wee we we ew mw wm + 
3 $2 — var DSTSA_TYPSPEC_TS_ADDR 
; 383 The DST Type Specification for the 
: 656 i Data Type being defined 
: 457 ! ; ; 
3 45 ‘ : ' 
3 45 0 ' — oeceee eer ewra ass eeeceer en coe eeeeececece eens eece een en —22— — 
460 : 
ee 
: 8 Define the fields of the Type Specification DST record. 
; 465 FIELD DSTSTYPSPEC_FIELDS = 
3 (266 DST$B_TYPSPEC_NAME = C2, 8.1, | The count byte for the Counted 
3 468 : ASCII Type Name 
; 469 DSTSA_TYPSPEC_TS_ADDR =( 3, A_ ) ! The location of the DST Type 
3 rth * Specification 
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byte 


var 
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DST TYPE SPECIFICATIONS | 


A_DST Type Specification specifies the data type o some data symbol. 
DST Type Specifications constitute the most general form of data type 
description available in the — *24 Table. They are found in 
only one kind of DST record, namely the Type Specification DST record. 
However, some Type Specifications contain nested Type Specifications, 
which permits quite complex type descriptions. For example, the parent 
type for a Subrange data type is given by a nested Type Specification 
within the Subrange Type Specification. 


This is the general format of all DST Type Specifications: 


tewmere rer ee cee ese en wm mame ewan r ern ewe eewe Seeeeanoeenoneoe See eee eGeeeeonenoneneanenea > 


DST$SW_TS_LENGTH 


2— eeecoeoeeoe Seeeeeeoeeooeoeeoeee SS SSS OSGeo eneneneane —2224 


DST$B_TS_KIND 


bee eeeeoaans eSeeeeeoeneneae See eee —— —— —— fS@e2eeenrrere2r eer eee = Seeeeeeneeoeeneane 
‘ 


+ 
Zero or More Other Fields Depending on DST$B_TS_KIND 
+ 


‘ 
‘ 
‘ 
' 
' 
‘ 
‘ 
' 
' 

* 


A data symbol whose data type must be described by a DST Type Specifi- 
cation is described by a Separate Type Specification DST record. This 
DST record is immediately followed by a Type Specification DST record 
which contains the DST Type Specification for the symbol's data type. 


To conserve DST space when several symbols have the same data type the 
Type Specification that follows the Separate Type Specification DSf 
record — be an Indirect Lye Specification. he Indirect Type Speci- 
fication then contains a DST pointer to the actual Type Specification 
DST record for the symbol's type. a | , single copy of this actual 
Type Specification is then needed. Multiple symbols of the same Record 
or Enumeration type must also use Separate Type Specification DST 
records followed by Type spec tt ication DST records containing Indirect 
Type Specifications. In this case, the Indirect Type Specifications 
point to the Recor * or —22h Type Begin DST record for the 
record or enumeration type being specified. 


In fact, the = Type Specification that can refer to a record or enum- 
eration type is the Indirect Type Specification. (The Novel Length Type 
Specification can too but is not noraal ly used this wey ) This Type 
Specification is thus used within other ype Specifica ions when record 
or enumeration types must be specified. For example, when the element 
type of an array st ’ recore rf qnuner aston type, it is speci tied by 
Indirect Type Specification within the Array Type Specification. Simi- 
larly, if the target of ? typed gg inter is a record or enumeration ype 
object. the cores type is speci *9 by ar Indirect Type Specification 
within the Typed Pointer Type Specification. 


ree — 
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H 9 : : 
— 1 Ps 
3 § ! Define all the fields that can appear in the various Type Specifications. : 
: : Also define the declaration macro. : 
; 5 FIELD OSTSTYPE SPEC FIELDS = : 
3 DSTS$W_TS_LENGTH ={0, WW], ! The byte jength of the Type 3 
3 5 : pecification not includ- ; 
3 539 : ing this bength field : 
; 40 DST$B_TS_KIND = » . de ! The Type Specification kind : 
3 41 DSTSB_TS_ATOM TYP = o B. de ! The Atomic data type code : 
: 8 DSTSA_TS_DSC_VSPEC_ADDR = » a oe ' The VAX descriptor Value Spec 3 
; 54 DSTSL_TS_IND_PTR = eo he de ! Indirect Type Spec DST pointer 3 
; 544 0 DSTSA_TS_TPTR_TSPEC_ADDR= » AL], ! Typed Pointer oarent type Type : 
3 545 0 : Specification location ; 
3 8 0 DST$B_TS_PIC_DLENG =(3, 86.1], ! The byte Length of data objects 3 
3 547 0 : of this picture type : 
548 0 DST$SB_TS_PIC_LANG =(€4,6_], ! The DST Language code for this : 
3 549 0 : picture data type : 
; 550 0 DSTS$B_TS_PIC_PLENG =(€5, 6.1], ! The Length of the picture 3 
3 551 0 ' string in this Type Spec s 
3 23¢ 0 DSTSA_TS_PIC_ADDR =(€6, A], ! The location where the picture 3 
3 5535 0 ° is encoded in Type Spec : 
3 554 0 DSTSB_TS_ARRAY_DIM = f 3, BL J; ! The number of array dimensions : 
3 555 0 DSTSA_TS_ARRAY_FLAGS_ADDR=[ 4, A_ J], ! The location of the oreey flags 3 
: 556 8 : that indicate Type Specs : 
3 557 } for the subscript types $ 
5 558 0 DSTSL_TS_SET_LENG et 3.4. ae ! The Length in bits of data : 
3 559 0 : objects of this Set type 3 
; 560 0 DSTSA_TS_SET_PAR_TSPEC_ADDR = C 7, A_ J,! The location of the Set's ; 
; 561 3 : parent type Type Sp c 
206 DSTSL_TS_SUBR_LENG *e®{ 3. t. J. ! The Length in bits of objects : 
; 5635 0 : of this subrange type 3 
; 564 0 DSTSA_TS_SUBR_PAR_TSPEC_ADDR= ( 7, A_ J,! Location of the gerent ype : 
3 565 0 ° Type Spec tt cation within 3 
3 566 0 : the Subrange Type Spec 

3 *8 0 DSTSB_TS_FILE_LANG = f 3, BL }- ! Language code for file type 

3 68 8 DSTSA_TS_FILE_RCRD_TYP =([{ 4, A_ J, ! Location of Type Spec giving 

; 26? ; element type for fil: ’ 

; 570 0 DSTSA_TS_AREA_BYTE LEN = f : AL 4 ' Length in bytes of PL/I ‘‘area’ 

3 571 DSTSA_TS_OFFSET_VACSPEC = ey ' Location of Value Spec giving 

; 276 : ase address of PL/I area 

; 75 DSTSL_TS_NOV_LENG e€ 3, t.. 2. ! The “novel” Length in bits of 

: are : 0 jects of this data type 

3 75 DSTSL_TS_NOV_LENG_PAR_TSPEC = { 7, L_ J,: DST pointer to perent type for 

; 378 : this “novel Length’ type 

3 57 DSTSL_TS_SELF_LENG =(€3,t.) ! Table length for this array of 

3 278 : PL/I Self-Relative Labels 

3 14 TES; 

5 581 MACRO 

: 5 ¢ DSTSTYPE_SPEC = BLOCKC BYTE) FIELD(DSTSTYPE_SPEC_FIELDS) 2; 

3 585 ! The following are the values that may appear in the DSTSB_TS_KIND field. 
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' 
LITERAL 
DSTSK_TS_DTYPE_LOWEST = 1, 
DST$K-TS_ATOM = 1. 
DST$K-TS~DSC = ¢: 
DSTSK-TS~IND = 3. 
DSTSK"TS-TPTR = 4° 
DSTSK-TS-PTR = 5; 
dsTeK tert ® g. 
DSTSK-TSARRAY = 7; 
DSTSK_TS_SET = 8. 
DSTSK_TS_SUBRANGE = 76 
. = 6 
DSTSK_TS_FILE = 11, 
DSTSK-TS-AREA = 1¢: 
DSTSK_TS_OFFSET = 13, 
DSTS$K-TS~NOV_LENG = 14; 
DSTSK_TS_IND_TSPEC = 15, 
DSTSK_TS_SELF _REL_LABEL = 1g. 
DSTSK-TS_RFA = 17, 
DSTSK_TS_TASK = 4 
— ————— 
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---Lowest sg Spec kind 

Atomic Ty pec 

VAX Standerd —— Type Spec 

ndirect Typ 

yped Beantee #0 <type Spec 

Pointer Type S$ 

Pictured ype pet 

array Type Spec 

Set Type io 

Subrange Ty 

—— 

File Type 

Area Type oe. (PL/I) 

Offset Type 5 yy 

Novel intern ype 

beeue —— he A... pointer to 
—** appear in DST) 

Seiten Me og Label Type Spec (PL/I) 

Record File Address Type Spec (BASIC) 

Task Type Spec (ADA) 

=---Highest Type Spec kind 


sre c 
e for future use 


! The following set of Literals give the Lengths in bytes of those Type 
; Specifications which have a fixed Length. 


LITERAL 

DSTSK_TS_ATOM_LENG s 4, 
DSTSK_TS_IND_CENG “2 * 
DSTSK_TS_PTR-LENG = 3, 
DSTSK_TS_FILE_LENG z 4, 
DST$K_TS_AREA_LENG 5 3. 
DSTSK-TS-OFFSET LENG = 
DSTSK-TS-NOV_LERG LENG = 1f, 
DSTS$K_TS_TASR_LENG = 3; 


Atomic Type Spec length 
Indirect Type Spec length 
Pointer Type Spec length 

File Type” pec length 

Area Type Spec Length 

Offset yee. Spec length 

Novel Length Type sone Length 
Task Type Spec length 
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; 


ATOMIC TYPE SPECIFICATIONS 


The Atomic Type Spec St ict ian is used to describe an atomic VAX standard 
5 


623 

624 

625 

£5 

628 data type. ype Spec tt teat ton consists of the standard Type Speci- 
629 fication header followed by a ; mate byte centoining the VAX standard 

6 data type code (one of the DSCSK_DTYPE_x codes). The Atomic Type Speci- 
° 1 fication has the following format: 

38 

5 word ; DSTSW_TS_LENGTH (= 2) H 

: byte : DSTSB_TS_KIND (= DSTSK_TS_ATOM) i 

6 byte : DSTSB_TS_ATOM_TYP H 


$ereoem reece mewn en cenrweer cern wet ees ee mane weer ese e sere sneer neo nce ema n ees eea $ 


DESCRIPTOR TYPE SPECIFICATIONS 


The Descriptor Type Specification is used for VAX Standard Data Types 

that can be described by VAX Standard Descriptors but cannot be de- 

scribed by an atomic type code. Packed decimal, which requires a 

digit length and a scale factor, and ASCII text, which requires a 

hiby, By th, are examples of such data types. The Descriptor Type 
c 


—— 
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Specification contains a Value Specification which must produce a 
VAX Standard Descriptor. This is the format: 
pweeworescen eset ee rem ee cet eee Bee Ee eT eee SDSS EEO sT TE Teno Tewseseee } 
word | DSTSW_TS_LENGTH i 
92S SSCS SS SSS SSSSSSSSSSSSSSSSSSSSSSSSSSSSSSFSSSSBSSSSS eeeeee aon. 
8 byte i DSTSB_TS_KIND (= DSTSK_TS_DSC) H 
666 vari DSTSA_TS_DSC_VSPEC_ADOR 
vee ; Value Specification Yielding a VAX Standard Descriptor 
ees — — ——— 


— 
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INDIRECT TYPE SPECIFICATIONS 


sh 


3 1 

J 

* 1 

The Indirect T Specificati i d wh h LT Specifi 

5 e Indirec pe Specification is used when the actua e Specifica- 
5 8 tion desired ig found in another DST record. This Type Speciticetion 

3 674 ‘ contains a DST pointer which points to that other DST record. The DST 
3 675 ! pointer contains the byte offset relative to the start of the whole DST 
3 ore ; of the DST record that gives the actual type information. The pointed- 
3 67 ‘ to DST record must be one of three kinds of DST records: a Type Speci- 
3 ors : fication DST record, a Record Begin DST record, or an Enumeration Type 
3 67 : Begin DST record. fhe Indirect ype Specification 9 the only Type 

3 680 ‘ Specification that can refer to a record or enumeration type; those 

3 681 8 $ types are too complex (potentially) to be referred to any other way. 

: ret } This is the format of the Indirect Type Specification: 

: 2684 i 

3 8 word H DSTSW_TS_LENGTH (= 5) ; 

3 3 ——— 2— 2 — —— OTTO BD HEH 2 ————24 

83 byte : DSTSB_TS_KIND (= DSTSK_TS_IND) ; 

3 3 ————22 

3 690 0 ' Lon : TSL_TS_IND_PTR ; 


a Ne ea Oe eo hee a | | J 
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re 4 TYPED POINTER TYPE SPECIFICATIONS 

es 

$36 The Typed Pointer Type Specification describes a typed pointer data 

69 type, —— @ pointer to a specific other data type. Pointer-to- 

238 integer, as found in pase) and other fanguages S$ an example of a 

$ type pointer type. In this example, integer is the ‘parent type’’. 

—9 I pe spot cation contains an embedded Type Specification which 

pec & 


arent type for the typed pointer type. This is the 
format of the Pype Pointer Type Specit eotient “ 


tome mn meee en ee meee weet eres en ew tee we ewe wwe ee wwe ee} 


706 word } DST$W_TS_LENGTH 
708 byte : DSTSB_TS_KIND (= DSTSK_TS_TPTR) i 
710 var} DSTSA_TS_TPTR_TSPEC_ADDR ; 


Type Specification for Parent Type that 
Objects of Typed Pointer Type Point to 
+ + 


— — — — — — — — — 


POINTER TYPE SPECIFICATIONS 


The Pointer Type Specification is used for pointer types which are not 
typed, meaning that the type of object that the pointer points to is 
not known at compile-time. PL/I posaters are examples of this kind of 
pointer type. Since there is no known parent type, none is specified 
in this Type Specification. The Pointer Type Specification thus has 
the simplest possible format: 


—EI 


—— 


— — 


word } DST$W_TS_LENGTH (= 1) 


tre w mm 2 I ee eT — 


byten DST$B_TS_KIND (= DSTSK_TS_PTR) 


geome er enema nane eeeoeoeoe See EEE Dee BE rE Tome Doe Sense wonDae me maanaeonere + 
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PICTURE TYPE SPECIFICATIONS 


_ coe re 0 tape, Specification is used for picture * types as found 


+ 1* — Languages, this es ture data types 
Vv w u 
vary associated “i th thi is s 9— 


74 byte length of jects of the picture type. ane ding of the —8— 
74 ~ 3 nd. ic picture enceding Cisuatly: the DITPC pattern 
74 tring). The actual data objects of the picture data type are assumed 
f ? to be represented as ASCII character strings. 
f § This is the format of the Picture Type Specification: 
754 
£38 word |} DSTSW_TS_LENGTH : 
738 byte ‘ DSTSB_TS_KIND (= DSTSK_TS_PIC) H 
760 byte : DSTSB_TS_PIC_DLENG : 
i byte : DSTSB_TS_PIC_LANG : 
764 byte ‘ DSTSB_TS_PIC_PLENG H 
var DSTSA_TS_PIC_ADDR 


Picture String Encoding 


var 
Value Specification Yielding a 


Language-Specific Encoding of Picture Semantics 


0—— — 
— } —— 
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DSTSB_TS_PIC_DLENG field contains the length in bytes of each data 
3J ect of this picture type. DEBUG assumes that picture objects are 
ot one internally as ASCII character strings. 


The Language code in the DSTSB_TS_PIC_LANG field is the same as that 
used in the Module Begin Dt récord. 


The 1. TS_PIC_PL a {tei¢ — he byte Length of the picture 

enc coding fr Tn othe BsT DOR field. The p gture encoding in the 
— —8 ts of a sequence of words. The high- 

order “byte. ore aot word contains an unsigned ropes it tee Sector and 

the low-order byte contains the ASCII —D— on of the 3 

picture character. Hence ghe © picture 7 5 s rghresenced & oy 

sequence of byte values: ‘ 
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picture 


The opti 
ficetion 
the enc 
string w 


-Se 21 
haters 


can be written as °'S(3)9.(2)9".) 


onal Value Spectticetion a the end of ¢t 
H elds oc! address of 
ino psec oxed with th ; * cture type. 


oy instruction when doing of 


this — type. f the Value Spec fieation 


only deposit ¢ 


how to encode numeric values. 


DITPC pattern str 


— 


he string 


igrosits 4 


# qnitted. 


aracter strings into such objects since 
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re Type Speci- 
the rforms 
ses this pattern 
a? 3 ects of 
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word 
byte 
byte 


var 


var 


var 


var 


var 
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ARRAY TYPE SPECIFICATIONS 


"3255 


1 36 s-32 v4.0 
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The Array Type Byam pete specifies an Array data type. This speci- 
es 


fication can be —*— 
ate tree’ ond Gl es ipt gat The et 

a ype and all su of ata es. e elemen e an 
of the subscripts are given by ody tional Type Specitice 
within the Array Type Specification. 


This is the format of the Array Type Specification: 


per but. ecause 9 not only spec 


emo mne mene enter mmm mem mwm wen wero cam rece nr os aneeea creer wwe c moan aeacce sce 7 


: DSTSW_TS_LENGTH ' 


—————————————————ÿ———4 


DSTSB_TS_KIND (= DSTSK_TS_ARRAY) ' 


ö—ÿ4 


helene tin sidicnaatiiiailediana’ 
DSTSA_TS_ARRAY_FLAGS_ADDR 
Bit Vector of Flags Indicating What Type 
Specifications are Given Below 


(The vector’s bit length is given by DSTSB_TS_ARRAY_DIM) 


Value Specification Producing an Array Descriptor 


Optional Type Specification for Array Element Data Type 


Optional Type Specification for First Subscript Data Type 


More Optional Type Specifications for Subscript Data Types 


0———— —— ——— —— — 
— —— — — — —— — — — — 


the shape of 
ut also specifies the eg gh element 

the types 
cations nested 


Here the DST$B_TS_ARRAY >” field gives the number of dimensions of this 


array type. Next, DSTSA_TS_ARRAY_FLAGS_ADDR gives the location of 


11% (39) 
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uw 
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bit-vector which indicates whet neotes Ty ‘ Byes)" seestens are found 
later in this Array Type Specification. bit 0 is set, a nested Type 
Specification is included for the orcey element f pe (the cell type). 
After that, if bit_n is set, a nested Type Speci gepton for the n-th 
ubser pt type is included in this Array Type Specification. If a bit 
n the bit-vector is zero (not set), the eyere ponding Type Specifica- 
tion i onitteg from the Array Type Specification. If the element type 
i s omitted, the element type $ assumed to be given by the 
orcey descriptor’s DTYPE field. If a subscr Rt type specification is 
ed, the subecr let type is assumed to be longword integer (DTYPE_L). 
(Subscript Type Specifications are mainly needed for enumeration type 
subscripts as allowed in PASCAL.) 


The number of bits in the bit-vector is DST$B_TS_ARRAY_DIM plus one more 
for the element type. The whole DSTSA_TS_ARRAY_FLAGS_ADDR field is of 
course rounded up to the nearest byte Boundary. 


The array descriptor Value Specification that follows the bit-vector 
field produces a VAX Standard Descriptor for the ecrey- (The Sener iesor 
class must be DSCSK_CLASS_A, DSCSK_CLASS_NCA, or DSCSK_CLASS_UBA.) This 
array descriptor gives the strides (or multipliers) and the Tower and 
upper bounds for all of the array dimensions. It also gives the element 
data type, peed ts scale factor, digit count, or other type infor= 
mation as * e. However, the descriptor’s element type can be 
overridden an element Type Specification as noted above; in this case 
the DSCSB_DTYPE field of the descriptor should be zero. 


The Array Type Specification is normally only used in two situations. 
First, it is used if the array fype does not have a compile-time-con- 
stant descriptor (for example, if it has variable array bounds) and no 
run-time descriptor exists in the user's address space. Second, it is 
used if the ervey type cannot be described a VAX Standard Descriptor, 
either because the element type gennet be described by a VAX Standard 
Descriptor or because the subscript types are not integers. (Element 
types such as records, enumeration types, and typed pointers cannot be 
described by VAX Standard Descriptors.) If neither of these situations 
pertains, there are simpler weys of describing array types in the DST 
using Standard Data or Descriptor Format DST records. 


28 
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SET TYPE SPECIFICATIONS 


The Set Type Specification specifies a Set data type as in PASCAL. A 
Set type a es has @ parent data 7: For the set-of-integers type 
for example, integer is the parent type. The parent type must be either 
integer, some enumeration type. or a —2* of those types: BUG 
assumes that th set type is rpropemise internally as a bit-string 
where a given bit is set if and only if the correspenetng integer or 
soumeret on type element is a member of the set. The n-th bit of the 
bit-str ng (starting at bit 0) is assumed to corcospend to the n-th 
element of the parent type. The length of the bitestring is part of 
the Set type and is specified in the Set Type Specification. 


This is the format of the Set Type Specification: 


@e @e &@e &@e GO Ge Ge G&e Ge GO Ge Ge Ge Ge Ge Ge Ga — ae — 


Fe eB TOBE DBs SOE — — — — ane ———224 


word } DST$W_TS_LENGTH 
byte Fn DSTSOTSAIND GF OSTSKLTSSE) 
se A ASAE ER ng ne 
var} DSTSA_TS_SET_PAR_TSPEC_ADDR 


Type Specification Specifying the Set's Parent Type 
+ + 


BEASS DOo OONOULS WO 


Here the DSTSL_TS_SET_LENG field gives the bit length of an object of 


öOOOOOOIOOIOOIOOOIOOIOOOOOOOOOOIOOCOOIOOOOOOOOIODCOOOOOOGSOI 


93 the Set data type. DSTSA_TS_SET_PAR_TSPEC_ADDR marks the location of 
3 an embedded DST Type Specification for the parent type of the Set type. 
9 Typically this is an Atomic Type Specification for type integer, an 
938 Indirect Type Specification that points to an Enumeration Type Begin 
939 DST record, or a Subrange Type Specification. 
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SUBRANGE TYPE SPECIFICATIONS 


The Subrange Type Specification describes a Subrange data type, meaning 
a subrange of sone ordinal type such as integer or an enumeration t pe. 
This Type Specification specifies the parent aoe (the original ordinal 
type? and the lower and upper bounds of the subrange. It also gives the 
bit length of objects of the Subrange type. This is the format of the 
Subrange Type Specification: 


fre EMR EE REESE DODO no nweme nace eawne >} 


word ; DSTSW_TS_LENGTH ' 
byte nannnnn a DSTS8,TS_KIND_(=”DSTEC_TS_SUBRANGE OT! 
st el ane ME ET LE 
var DSTSA_TS_SUBR_PAR_TSPEC_ADDR 


RARARARARANRE EEE REESE 


WN 98 OONA NE WN "OOD ONAUE WO 


Type Specification Specifying the Subrange's Parent Type 


965 var H 

8 Value Specification Giving the Lower Bound of the Subrange ' 

968 : : 

970 var } : 

44 ' Value Specification Giving the Upper Bound of the Subrange 

97 : : 

974 enw nomen awn roe serra nreneocusaswzweoces — — — — — —— ————— —2 

975 

z 

978 Here the DSTSL_TS_SUBR_LENG field gives the length in bi... of objects 
979 of the Subrange data *8 DSTSA_TS_SUBR_PAR_TSPEC_ADDR marks the 

980 location of a DST Type pecification for Ehe parent type of the sub- 
981 range. Typically this is an Atomic Type Specification for type integer 
98 or an Indirect Type Specification pointing to an Enumeration Type Begin 
; DST record. 


The two Value Specifications in this Type Specification specify the 
lower and upper bounds of the subrange. These bounds values must be 
values of the parent type. 


Be Se Se Se Se Ge Se Se Hy FH Se Se Se Ge Se Ge Ge Se Gs Ss Se Ge Ge Ge Se Se Se Se Se Ge Se Se Ge Se Se FSS Ss Se Se Se Se Se FH Se Se Sees 
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FILE TYPE SPECIFICATIONS 


The File "eps Soget* Scot ton epee tries a File data type as found in 
PASCAL or PL/I, for example. nce the interpretation of File types 
var a from Language to language, eS language code for this File 

type s included in the Type Specification, Optionally, a file record 
Type sere Frcet ten gen be inc luded specifying the type of a record in 


SESS2SSz 


1 
i 
i 
i 
i 
i 
i 
i 
1 
99 i is file type. L File-of-Reals, for instance, vould have Real 
8 (F-Floating as dy tiles record type. 
900 ; This is the format of the File Type Specification: 
008 i 
004 2 ' word } DSTSW_TS_LENGTH 
8 byte : DSTSB_TS_KIND (= DSTSK_TS_FILE) : 
008 9 ! byte | DSTSB_TS_FILE_LANG : 
010 9 var} DSTSA_TS_FILE_RCRD_TYP 
Big 8 ; Type Specification Giving the File Record Type 
014 0 i 
01 5 0 ‘ ¢eeeceece s—aomr ee — ee me — — —2— — 2 — eeaaene + 
Big 0 4 
eg 
019 8 i Here the pores, TS sfice LANG field contains the language code for shis 
ost 0 ; file. The same language codes * used as in the ont goss DST 
021 0 : record. DSTSA, TS_ F LE —8 TYP is the location of a Type Specifi- 
bs¢ 0 ‘ cation for the record f ype. “if applicable. This a — fication is 
023 0 ‘ optional; if omitted, file-of-characters is assumed. 


Be 


? 
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AREA TYPE SPECIFICATIONS | 


NOTE: THIS TYPE SPECIFICATION IS NOT SUPPORTED BY DEBUG V4.0. 


The Area Type Specification describes a PL/I ‘'area’’ type. PL/I areas 
are regions of memory whose base addresses are determined at run-time. 
Areas are always used in conjunction with PL/I Offsets (see below). 


VFN —OOONOUE 


SESS Sess 


VOcoo US WwN—O 


öOOSOSOSOOOOOIOOIDSOOOIOOOIOOOOOOO8SOOO 


—— — — — — — — — — — — — — — — — — — — — — — — — — — — 


— 
eal 


word 
byte 


var 


This is the format of the Area Type Specification: 


à ——— oes eer ese aeneceezr as ear een wzmeecvon ween me oe er aceon cess ooe se ene + 


H DSTSW_TS_LENGTH ' 


Pew S SOB O OSS — SCS ETE SO HST DSM EEO WOE Dee Deo econo + 


; DSTSB_TS_KIND (= DSTSK_TS_AREA) ; 


ero em mmeerenw sce ececosew emer re ewe e woe ena nreoeawmaermenaae nr ecewess emcees wo oes es } 


DSTSA_TS_AREA_BYTE_LEN 
Value Specification Giving the Area Byte Length 


⏑ — — — ⏑⏑— * 


Here the DSTSA_TS_AREA_BYTE_LEN Value Specification specifies the byte 


length of the PL/T Area. 
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OFFSET TYPE SPECIFICATIONS 


NOTE: THIS TYPE SPECIFICATION iS NOT SUPPORTED BY DEBUG V4.0. 


The Offset Type Specification describes a PL/I ‘offset’ type. PL/I 
offsets are offsets relative to the start of a PL/I ‘area’ (see above), 
a dynamically allocated —* of memory. The Offset Type spec St ice 
tion specifies the base address of the associated area and the byte 
offset value of this offset type. This is the format: 


pO PERE DE Me BOSE BOD SRN ENT ADSH ED OSH BETZ EDO SDE HOOD owre En we Deawons $ 


word | DST$W_TS_LENGTH i 
byte} DSTSB_TS_KIND (= DSTSK_TS_OFFSET) 

err eeecece — — nee un nee ee ner ease eeoewm ont e sete ten ee tree mer eocwamas + 
var DSTSA_TS_OFFSET_VALSPEC 


Value Specification Giving the Base Address 
of the Area Associated with this Offset 


var 
Value Specification Giving the Byte Offset Value 


0—— 
5 


Here the DSTSA_TS_OFFSET_VALSPEC Value Specification produces the base 
address of the associated area and the second Value Specification gives 
the byte offset value into the area. 


SGOOOSOSSOSOSSOSSCOSOCSOOCSCSOSOOOCOOOOOOOOOOOOoOoOoOO 
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NOVEL LENGTH TYPE SPECIFICATIONS 


=) 
38 
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The Novel Length Type Specification is used to specif ~~ data F 
that is identical to @ parent data type except that the objects o shis 
new type neve a different length (a Mrovel” or of BReees length). 
rxee, te for —222 is used for the components o CKED records —F 

CAL, for prenet e. A boolean component of a packed record consists 
of a single bit (the novel henge) while all other booleans sonatas of 
a byte (the ee length). yt y the packe olean type 


SSSSSEESISEE 


Novel a's "the sere fica fon ysed which? specifies —* novel tength 
00 nts to T descripti on ‘ot the parent type. namely the normal 
01 booteen type. faue accessed objects of a Novel-Length type by expand- 
og ing them to tne” normal Length for that type. 
This is the format of the Novel Length Type Specification: 
Se PSSS SSS SSSSSSSSSSSSSSSSSSSSSSSSSSSeeeeseseeoeonnooonoannoonaaeon a 
word H DSTSW_TS_LENGTH (= 9) : 
byte : DSTSB_TS_KIND (= DSTSK_TS_NOV_LENG) ; 
Long H DSTSL_TS_NOV_LENG ‘ 
long : DSTSL_TS_NOV_LENG_PAR_TSPEC } 


Geoeecoseesoosooscososesssosoousoucescooesoosesesesscosecoescooocos 


Here the DSTSL_TS_NOV_LENG field contains the ‘‘novel"’ longth of this 

data type. The DSTSL_TS_NOV_LENG_PAR_TSPEC field is a DS pointer which 
contains the byte offSet relative to Ehe start of the whole DST of the 
DST record that specifies the parent type. The pointed-to DST record 
must be a Tyee 3 Spec pvegeten DST record, a Record Gegin DST record, or 
an Enumeration Type Begin DST record. (typi “eons it is a Type Speciti- 
cation DST record containing an Atomic Type S$ —** for type inte- 
ger or boolean or an Enumeration Type Begin DST record.) 


Oa ee ee ed ee ee ee ee ee ———— — 
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SELF-RELATIVE LABEL TYPE SPECIFICATIONS 


The Self-Relative Label Type Specification specifies the type of a PL/I 
self-relative’ label. Such a label is actually a label array meaning 
that it must be indexed by an integer value to yield a **1 ¢ label 
value. The internal representation consists of an array of longwords 
where each array element contains a label value relative to the start of 
the ott Mak ng the 224 values relative to the start of the array 
ensures that the label array is Position-Independent (PIC). 


This is the format of the Self-Relative Label Type Specification: 


MF wry Oo~ 


teow w 2 een eee ee ee een en wn m este eto eee en} 


word | DST$W_TS_LENGTH (= 1) ; 


Ferret nm annanee non wmeoenwwwro mower er armen seen ecaweneen ene wee snes ewoeeaae $ 


byte ; DSTSB_TS_KIND (= DSTSK_TS_SELF _REL_LABEL) ' 


wre msec enra se non een ene cee Sen Deas eoas ease esaeneseDece ue seecansunaaecea + 


TASK TYPE SPECIFICATIONS 


NOTE: THIS TYPE SPECIFICATION IS NOT SUPPORTED BY DEBUG V4.0. 


The Task Type Specification specifies the data type of task objects 
as found in ADA. Objects of the Task data type are assumed to have 
longword values understood by the ADA multi-tasking kernel. Since 
no additional information is associated with the Task data type, the 
Task Type Specification has the minimal format: 


DONAME 


wn 


owe Bem — Vem e Denes weseneenewnornrrewmerseaceseanceaa ” 


word DST$W_TS_LENGTH (= 1) 


ù———— eee 2 eset sean eseaes meses ene seaseeemoewe mews + 


byte | DSTSB_TS_KIND (= DSTS$K_TS_TASK) ; 


ee eseeceoe Seeeeeeoeoeoeoeeneoeeae a 
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i END OF TYPE SPECIFICATION DESCRIPTION. 
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ENUMERATION TYPE DST RECORDS 


Enumeration tyees. as found in eASCA, and C, are represented in the 
DST by three kinds of DST records. The Enuneret ton 7 Begin DST 
record describes the type itself, giving the bit Leng f objects 
of that type and the name of the type (e.g., COLOR). This record 

is followed by some number of Enumeration Type Element DST records, 
one for each element, or literal, in the type (e.g. » BLUE, and 
GREEN). Each Enumeration Type Element DST record gives the name and 
numer ic yok of one Literal of the enumerat qn Sype. The whole type 
description is then terminated by an Enumeration 


~~~ 
APU SOONER 


ype End DST record. 


The Enumeration Type Begin and Enumeration Type ene DST records thus 
bracket the List of elements of the type, much Like other Begin-End 
pairs in the DST. The Enumeration Type Etenent DST records within 
those brackets do not have to be in numeric order of their values, 
although it is desirable if they are. for languages Like ADA, where 
the numeric values of the elements need not go up sequentially with 
the logical element positions, the Enumeration Type DST Elements do 
have to be order of their logical positions, however. No other kinds 
of DST records (except Continuation DST records) may appear between 
the Enumeration Type Begin and the Enumeration Type End DST records. 
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THE ENUMERATION TYPE BEGIN DST RECORD | 


' . 
; 
' . 
i The Enumeration Type Begin DST record specifies the name of an ; 
; enumeration type and the bit length of objects of that type. ; 
: It also serves as the opening bracket for a List of Enumeration 3 
Type Element DST records, and must be matched by a chooing : 
: Enumeration Type End DST record. This is record's format: : 
} byte : DSTSB_LENGTH i ; 
i byte i DSTSB_TYPE (= DSTSK_ENUMBEG) i ; 
i byte DSTS$B_ENUMBEG_LENG i : 
byte i DSTS$B_ENUMBEG_NAME i ; 
i var : : ; 
The Name of the Enumeration Type in ASCII ‘ : 
! (The name's length is given by DSTSB_ENUMBEG_NAME) ; 
! | | 
i — 2224 
1 
' + 
Define the fields of the Enumeration Type Begin DST record. : 
FIELD DSTSENUMBEG_FIELDS = | 3 
DSTS$B_ENUMBEG_LENG = £2, 6.3, | Bit Length of data objects of | ; 

: this enumeration type : 

DST$B_ENUMBEG_NAME *€ 3, @ 3 ' Count byte for the Counted 3 

res : ASCII Type Name : 


| * sep: 198¢ 3:05:39 | “S3sddocadescoteuc: SRCJbSTRECRDS.nEa:t (47) 


5 THE ENUMERATION TYPE ELEMENT DST RECORD 
ree Enumeration Type —* DST record specifies the name and value 
of one element (one Lit — z of an enumeration type. It may only 
4 paqeer between an Squmeret on Type Begin and an Enumer —* Type vind 
41 DST record. 4 —2 ng represents ten of enumeration types 
4 assumed to be un tege ger. The DSTSB_VFLAGS field in this record 
4 has its norsel Vinterpretat on (se a. the § ofider Data DST record for 
44 the details). Hence the DSTSV_VALKIND field will have the value 
45 DSTSK *VALKIND LITERAL and the BSTSL_VALUE field will have the appro- 
r priate integer value in this case. 
4 This is the format of the Enumeration Type Element DST record: 


Peet ene we BSD ewe DDE BETES STS SHR asa naeonewomrewcesnacoonoaaouens 


wy 
Wn "OOM 


J ' 

: i 

: i 

: i 

r i 

: i 

: i 

: i 

: i 

: i 

: i 

: i 

: i 

4 i 

: i 

4 i 

; i byte DSTSB_LENGTH : 
i 356 i byte { DSTSB_TYPE (= DSTSK_ENUMELT) i 
i 3256 i byte | DSTSB_VFLAGS i 
i 3258 i tong | DSTSL_VALUE 
; 60 i byte | DSTSB_NAME 
; o¢ ‘ver ' 
: o7 ‘ The Name of the Enumeration Literal in ASCII ' 
: 65 ; (The name's Length is given by DSTSB_NAME) 
: $367 por } 
. ' 

i $599 i 

3 71 ; 

; , THE ENUMERATION TYPE END DST RECORD 

; 3274 ; 

; 75 : The Enumeration Type Ena DST record terminates the description of an 
; , enumeration type. This is the record's format: 

i 3678 i 

; 9 : byte : DSTS$B_LENGTH : 
; B ' byte i DSTSB_TYPE (= DSTSK_ENUMEND) : 


: § 
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RECORD STRUCTURE DST RECORDS 


Record structures, or simply records, refer to the aggregates of non- 

h neous components found in many banguages In some Languages, 

such constructs are called ‘records’ (in PA GAL ong COBOL, for example) 

and in others they are called ‘structures’ (in PL/I, for example). 

Here we will cot them “records’’. What all records have in common is 

that they consist of a set of named components, each corresponding to 
some field in the record structure. The components can in general be 

of any data types supported by the Language. 


In the De 2 Table, a record is represented by a Record Begin 

DST record followed by some number of data object DST records, one for 

each record Sampanens «20s ewes by_a Record End OST record. Any data 
ta 


object DST record n a Record-Begin/Record-End pair is taken to 
denote a component of that enclosing record specification. Other DST 
records may also appear between the Record-Begin/Record-End pair, such 
as Type Specification and other DST records that specify the data types 
of t ? components. However, only data DST records denote record com- 
ponents. 


Nested records are defined by record components which are themselves 
records. The type of a —* component which is itself a record is 

defined by another Record-Begin/Record-End gate of DST records. This 
additional record definition may appear inside the original record 
definition, but does not have to do —*85* Indirect Type Specification 

pointing to a record definition outside the riginal record definition 

is else legal. Conversely, a record definition inside another record 
definition does not define a nested resere unless some component of 
the outer record actually references the inner record definition. In 
short, the DST can only describe one level of record components at a 

time, but any component can be of any arbitrary data type including 

another record type. 


— —2— oe ob Lb 


NOU EWN OO Oo 


The Record Begin DST record is unusual in that it can define both a 
ject. If the DST$B VFLAGS field has the special 
$K_VFLAGS_NOVAL, then the Record Begin DST record defines an 
abstract data type. | object of this data type must be represented 
by a Separate Type Specification DST record which pyneeretesy precedes 
either the Record Begin DST record or a Type $ oc ttices ten DST record 
nts to the Record 


However, if the DSTSB_VFLAGS field does not contain DSTSK_VFLAGS_NOVAL, 
then the Record Begin DST record defines both a data type and a data 
object of that type. This form can be used for languages such as COBOL 
wh gh do not have named data types. In this case, the DSTSB_VFLAGS and 
DSTSL_VALUE fields speci y the address of th recore object Tn the same 
way as in the Standard de a DST record. It is still nego! to have 
Indirect Type Specifications pointing to this Record Begin DST record, 
using it strictly as a type definition. 


Some Languages. such 9s, PASCAL . allow record variants. (In ADA, the 
same concept is called ‘discriminated’ records.) An object of a record 


wn 


wm 
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type with variants contains gene set of components found in all objects 
0 pe type plus some set o componente that vary from one record 
variant to the next. Which of the varying components are actually 
present in a given eoaere may be determined by the value of a ‘tag 
variable’’ which is a fixed ——2 of the record. Variants may also 
be nested so that variants have variants. 


In the DST, record variants are described by Variant Set Begin DST 
records, Variant Value DST records, and Variant Set End DST records. 
The Variant Set Begin DST record marks the beginning of a set of record 
yor tents. where each variant cone jets of some set of record components. 
a Variant Set Begin DST record indicates which record Conpqnent on- 
stitutes the se verteyie that discriminates between the variants in 
the set. This tag variable must be a component of the same record and 
must precede the Variant Begin DST record in the DST. me Variant 
sept Det recere also gives the bit size of the variant, if known at 
compile-time. 


DONAVNES WHO DONO Sw 


DPADADASIVIVIVIT 


The Variant Value DST record marks the beginning of a single record 
variant. It also specifies all fag variable values or value ranges 
that indicate the presence of this variant in a given record object. 
ALL record components (indicated by data DST records) after this Vari- 
ant Value DST record and before the next Variant Value or Variant Set 
End DST record are taken to be components in this variant. 


The Variant Set End DST record marks the end of some set of variants 
ulcers May 4, specification. It also terminates the last variant 
a n the set. 


A record type with variants is thus specified as follows. First a 
Record Begin DST record marks the beginning of the record specifica- 
tion. After that come data DST records that denote all fixed compo- 
nents of the record eyes. Then comes a Variant Set Begin DST record 
that marks the beginn ng of a set of variant definitions and identi- 
fies the tag variable (if any) for that variant set. Immediatel 
thereafter comes the first Variant Value DST record. It marks the 
start of the first variant and identifies the values or value ranges 
of the tag variable that correspond to this specific variant. 


After the first Variant Value DST record come the data DST records 

for the record components in this particular variant. Next comes the 
Variant Value DST record for the next variant, along with its component 
DST records, and so on for each variant in the yer tent set. After the 
last ¢ nent OST record for the lost variant in the set comes a 
Variant Set End DST record. It is followed by the DST records for any 
ode! stone} record components, pose ioty including additional variant 

set definitions. Then comes the the Record End DST record. 


Variant sets may be nested inside yer tant sets. fuch nesting is indi- 
cated in the DS x the corresponding proper nesting of Variant Set 
Begin and Variant Set End DST records. 
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nee = 


= 
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The bit size of objects of this record type is also given in the DST 
record. This size should be included if the size is known at compile- 
time. If it is not known at compile-time, it should be specified as 


zero. 

¢ This is the format of the Record Begin DST record: 

4 
Beh BE Re O  E 
—— — —————— 

bee oO IT A eS 

r Sgt et EE i en NT 
Gates: Se I ni me, ANE er 
! var 


The Name of the Record or Record Type in ASCII 
(The name's Length is given by DSTSB_NAME) 


öOOIOIOOIOOIOOIOOIOIOOIOOOIOOIOOOOIOOCOOIOOOIOOIOOCOIOOIOOCSOOOOOOOOCOOOGõGOũSC 


emer S S 22 


i tong } DST$L_RECBEG_SIZE 


towwoevesr crew secon ee wmen nea ew mrmoe rere oe + 


i Define the fields of the Record Begin DST record. Also declare the macro 


1 
' 
' 
! 
! 
' 
] 
' 
1 
! 
J 
! 
i 
i 
' 
' 
J 
— 
i 
J 
5 
' 
i 
i 
' — 24 
' 
1 
' 
‘ 
! 
4 
1 
' 
' 
4 
i 
' 
' 
q 
‘ 
¢ 
’ 
' 
' 
i] 
‘ 
‘ 
J 
J 
' 


+9 ' that defines the trailer part of the DST record. 
* FIELD DSTSRECBEG_TRAILER_FIELDS = 

44 DSTSL_RECBEG_SIZE =€C0,L. 1] ! The bit size of data gbjects of this 
445 : record type (or f unknown) 
+8 TES; 


48 MACRO 


— 
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DSTSRECBEG_TRLR = BLOCKL BYTE) FIELD(DSTSRECBEG.TRAILER.FIELDS) %; 


THE RECORD END DST RECORD 


a Record End DST record marks the end of a record type definition in 
the DST. In effect, it terminates the scope set up by the matching 
Record Begin DST record. This is the record's format: 


¢ De Se SE OEE DE SEB SSH 02 eas enoeneoamaenwaenesaosaaneses > 


byte | DSTSB_LENGTH (= 1) i 
byte : DSTSB_TYPE (= DSTSK_RECEND) 


tamer ocere cree en een swe wocenwr ene emer nmez acne nm necamra ane en enn ——4 
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THE VARIANT SET BEGIN DST RECORD 


The Variant Set Begin DST record marks the beginning of the DST 
description of a set of record variants. This DST record also 
identifies the tag variable that discriminates between the variants 
in the variant set. The tag variable is identified by a pointer 

to the DST record for the tag variable. This DST pointer consists 
of a ogre address relative to the start of the DST. The size in 
bits of this variant set, meaning the size of the largest variant 

in the set, is also included. If this size is not known at compile- 
time, it should be set to zero. 


This is the format of the Variant Set Begin DST record: 


422222 eeeeoe ù SEBO o Dn Besos ese Sense ewrenaweseseca casas ae + 


MACRO 


. 1 

i 

: i 

: i 

4 i 

; Pang 

. t 

: i 

: i 

gS 

; has 

: 8 : 

. 1 

5 i 

4 0 i 

4 0 i 

; fy 

3 8 } byte : DSTSB_LENGTH i 
3 8 } byte H DSTSB_TYPE (= DSTSK_VARBEG) : 
: 0 ! byte ; DSTSB_VFLAGS H 
3 0 ' baeaenmemenrenanaaen ee freee > SBP OBC se STC eSB Be Be wee De We eee es eerawe aes ce asseeosctaoce + 
3 0 ! tong : DSTSL_VALUE : 
3 0 ' byte : DSTSB_NAME ; 
3 0 ' ¢ ower ener eee cae se see ceonee — — — — * ee om — 2 — ————22 
0 ' var ; ; 
: 2 The Name of the Variant Set in ASCII ‘ 
3 8 ‘ (The name's Length is given by DSTSB_NAME) 
3 4 (This name is normally null) 
: 0 i 
3 206 0 ' ¢erer sere meer ser eoce nee nncenaececerna ee SS oe ae et mm oe (SO a Dee me em oe em ee a om @woeerseacese t 
3 8 0 Long : DSTSL_VARBEG_SIZE H 
3 505 § ! long : DSTSL_VARBEG_TAG_PTR : 
3 206 0 ' Pw eer neem — — nanan ecean eee ac anemteaoaae 2 ee a oo ems eewmaanerereronroa => 
3 507 0 : 

oo 

: 510 0 ! Define the fields of the Variant Set Begin DST record. Also define the 
$ a3 declaration macro for the trailer part of the record. 

3 318 8 FIELD DSTSVARBEG_TRAILER_FIELDS = 

3 515 DSTSL_VARBEG_SIZE ={€C0,t. 1]. ! Size in bits of variant part 
3 218 8 4 of record (or zero) 
§ 51 DSTS$L_VARBEG_TAG_PTR =(€4,t.] ! Pointer to TAG field DST 
3 218 : record relative to the 
3 51 : start of the DST 

3 520 TES; 

3 : 1 

3 5 5 


DSTSVARBEG_TRAILER = BLOCKC BYTE) FIELD(DOSTSVARBEG_TRAILER_FIELDS) 2%; 


——— — — 
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THE VARIANT VALUE DST RECORD 


The Variant Value DST record marks the beginning of a new record 
variant within a variant set. It also marks the ong of the previous 
variant (if any). It is always round between a Variant Set Begin 

and a Variant Set End DST record. Since the Variant Set Begin DST 
record has already spec it ted the tag variable, the Variant Value 

DST record only specifies the tag value or values that correspond 

to the present variant. It also specifies the size in bits of this 
variant if known at compile-time (otherwise zero is specified). The 
Variant Value DST record is followed by the data DST records (includ- 
ing nested variants if appropriate) which constitute the components 


PUPVLIVPUSV IV SIVLVSVSVSUIVSUSVSUSVSISIS 
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. ' 

; i 

+4 i 

— i 

4 i 

. i 

r4 i 

rf i 

4 i 

— i 

r4 i 

: i 

: i 

; i } of this specific variant. 

; 9 : A variant may have many tag values or tag value ranges. This DST 
; 40 ; record thus specifies a set of tag value ranges. The way these 

; 8 ranges are specified is described in detail on the following page. 
; 58 0 } This is the format of the Variant Value DST record: 

: 545 0 : 

5 546 ' de mecmmmemrmeoet ere wcrc mre cocci ew seaocwmneomcmncaerone asa ee Seeeeeeeeeneeenoeeaneeo + 
; 547 0 ! byte ; DSTS$B_LENGTH ' 
3 548 0 ' bere manaman meaner — — o_o we senenanmraene t 
; 549 0 ! byte ; DSTS$B_TYPE (= DSTSK_VARVAL) : 
4 550 0 ‘ ¢ ewer eeceraee eeeeecee Sew 0 we See SMe KNB EO STB BED SOHO OEE BOSE BES eee ae we eoee dt 
; 551 0 ! tong : DSTSL_VARVAL_SIZE H 
4 z33 0 ‘ bam mora monn em wrens arom nmooer ae mame ewe awe eeeeee wee ern wee Bw ew wm wD eM women ew oe + 
; 227 8 : word | DSTSW_VARVAL_COUNT : 
Py 4 be em oe eeeoeooee SSS SSSSSSSSSSSSSSSSSSSSISSSISISSSSISISSISSIS“ SSS eeeeee ee ee 

; 32? 8 : var i DSTSA_VARVAL_RNGSPEC 
: 359 8 } Zero or More Tag Value Range Specifications 
3 223 : (The number of Range Specs is given by DST$SW_VARVAL_COUNT) 
; 561 0 : ' H 
b 56 ' per rw awrr enw aceenoseevos BEER EBS Doman ate MOE aE EE Ee wa oe + 
3 56 : 

; 564 : 

; 565 : 

; 266 : Define the fields of the Variant Value DST record. 

3 208 FIELD OSTSYARVAL FIELDS = 

; 570 DSTSL_VARVAL_SIZE 2 f 2. kh }- ! Bit size of this variant part 
; 571 DSTS$W_VARVAL_COUNT =(6, Ww], ! The number of tag value ranges 
; 57 : which follow 

; 57 DSTSA_VARVAL _RNGSPEC =(€8, AL] ' Location where the tag value 
3 278 * range specs star 


ederim at oe alli a eo ae RC A 
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— 


AAA AAAI ANNAN AANA WANA 
SSLESLESERS OP ORS LAS 


8 
r$-sep-1964 25:01:08 vaycyy ats 


TAG VALUE RANGE SPECIFICATIONS 


Each Tag Value Range Specification in a Variant Value DST record 
consists of a byte agg fa the kind of the range specification 
folloved by one or two Value Specifications. If one Value Speci- 
fication is given, that gives the fag value=-the range consists of 
that one value. [f two Value Specifica 

fy the lowest and highest values in the tag value range. 
strations below show the two possible formats of Tag Value Range 


. ' 

4 i 

4 i 

4 i 

4 i 

4 i 

rf i 

. i 

4 i 

: i 

; Specifications: 

: i 

: byte H DSTSB_VARVAL_RNGKIND (= DSTSK_VARVAL_SINGLE) : 
4 J — — — — — — — — —2 — — — —— 0 — 222 
var} DSTSA_VARVAL_RNGADDR 
; 0 ; A DST Value Specification Giving a Variant Tag Value 
3 = 4 
3 0 ' $ wmmmmwm www w ewww ww meme + 
; 0 : 

; 0 : 

; 0 : 

Py 0 ' $¢eoece se ee oe eee nme — — — ù— SOO ——————————— 22* 
i byte | DSTSB_VARVAL_RNGKIND (= DSTSK_VARVAL_RANGE) 
3 3 FPSO OR —— — — 2 STS — — — TH — — —— — ————————— 22224 
‘var | DSTSA_VARVAL_RNGADDR 
: 8 A DST Value Specification Giving the Lower Bound 
; 0 } for a Range of Variant Tag Values 
; ee } | 
Py 0 ' — scence sae oacwneonn see em eae @Srererr2reon en m2eec coca twe oc neeovre®oe reac asees ere + 
; 0 ‘var } H 
3 0 A DST Value Specification Giving the Upper Bound 
; for a Range of Variant Tag Values 
i | ! 
: 0 ' oS ee ee ce i ee (Re oe oe tee ee es ee oe ae om oe a oe (eR GR ee SD Om ae Ge ae eo ge ae ee ee a om ey em me me ae ee oe te — 222— + 
. ' 

4 i 

; : : 

⸗ Define the fields of the Tag Value Range Specification. 

; FIELD DSTSVARVAL_RNG_FIELDS = 

; DSTSB_VARVAL_RNGKIND = f 0. B. }. ! Tag Value Range Spec kind 
: DSTSA_VALVAL_RNGADDR = 7 AS ' Location of first Value 
3 ; Specification 

; TES; 

: ! Define the possible values of the DSTSB_VARVAL_RNGKIND field. 


tions are given, they speci- 
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LITERAL 
DSTSK_VARVAL_SINGLE 
DSTSK~VARVAL RANGE 


urnn RY WH 


! The range consists of a single value 
! The range is given by a lower and an 
; upper bound (two value specs). 
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THE VARIANT SET END DST RECORD 


The Variant Set End DST rerore marks the end of record variant set; 


18 terminates a set of variants which have the same tag variable. 
This is the format of the Variant Set End DST record: 


-eerenmoceneecee ne eee swore enema retro enenwmannmrenrereerersreon eer seanaeocnaaawaas * 


' DSTSB_LENGTH (= 1) : 


ö—4 


DSTSB_TYPE (= DSTSK_VAREND) ' 


Geowcecooesoooscososecooseooosessescooscesooeseecoeeseoocececoso - 


: (DEBUG. SAcibstREcans. reas’ 
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BLISS DATA DST RECORDS 3 


BLISS data objects are represented by povere} different kinds of DST 
records. Ordinary scalar objects, such as simple integers, are repre- 
sented by the Standard Data DST record or its variants. However, the 
more specialized BLISS data types such as Vectors, Bitvectors Blocks, 
and Blockvectors, are represented by a special osf record called the 
BLISS Special Cases DST record. Po ators to such objects (e.g., REF 
vector? are also represented by this DST record. In addition, ALISs 
field names are represented by their own kind of DST record. the + Pa 
te DST record. Both of these record kinds are described in this 
section. 


The BLISS Special Cases DST record and the BLISS Field DST record are 
supported for BLISS only. They should not be generated by compilers 
for any other Language. 


— — — eee... — — 
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THE BLISS SPECIAL CASES DST RECORD 


me BLISS Special Cases DST record is ye sed to describe a number of 
: bjects whose data types are specific * he BLISS Language oe 
ncludes such objects as BLISS Vectors tvectors, 94 
Blockvectors inf pointers to these objects iner F VECTOR, REF BLOCK. 
= J ‘mis . DST record should not be generated for any ——— 
er than 


ts of four parts: The DST header fields, the 
tetgs in the set ttt +3 FIELD, a@ variable-length set of fields, and 
tie DSTSBLI_TRAT 


L_FIEL 
St of the fie ds in ,bsts8 I_ VEC FIELDS 
psTsaCt get ork. FIELDS, 


T 
or the fields in Detect sPixvec matey vateee 4 of Hela $ eopeers 


This is thus the format of the BLISS Special Cases DST record: 


Feeeeeeece eee ee ee eeeeeeSeeSeeeeeseseeeeeeesooeooooooocaoooecooesoa — 


The BLISS Symbol Name in ASCII 
(The name's Length is given by DSTSB_BLI_NAME) 


byte DSTSB_LENGTH H 

byte ‘ DSTSB_TYPE (= DSTSK_BLI) H 

byte : DSTSB_BLI_LNG H 

byte i DST$B_BLI_FORMAL ; 

byte ‘ — DST$B_BL1 aVFLAGS | 5 

byte i6u! REF: Unused--Must Be Zero : DSTSV -BLI_STRUC H 

var i DSTSA_BLI_SYM_ATTR 

BS Variable-Length Portion of DST Record | 

8 — —8— — 

long H DSTSL_BLI_VALUE $ 

2 byte | DST$B_BLI_NAME 
4 var : 
: | 


— — — — — — — — — — 


— — — ———— em Be EDA ———————————————— 


long : DST$SL_BLI_SIZE : 


we ec eww were crewmen neem merce an nsw nr see MEM Een Bem e wen wmnr ewe rere reece eee + 


SN NNN 


Rofornonoronys 


Vw 0 0@ 
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The yorteble=tongeh portion of he ag | record can have several forms 


as discussed above. One possi. ¥ is that it is absent altogether. 
This occurs if the DSTSV_BLI_STRUC field contains DSTSK_BLI_NOSTRUC. 


However, if DSTSV_BLI_STRUC has the value DSTSK_BiI_VEC, the variable- 
Length portion of the DST record has the following format: 


Fewer er remem ac an roe em osc maa case nenwnazreascae a 


long : DSTSL_6LI VEC_UNITS : 


$ mane rewr nanan eareweneneanocnrureenac — ners aes en ans enwnesrews an oranss & 


byte ; DSTSV_BLI_VEC_SIGN_EXT ‘ DST$V_BLI_VEC_UNIT_SIZE H 


MEW OOOO 


— — 


If DSTSV_BLI_STRUC has the value DSTSK_BLI_BITVEC, the variable-length | 
portion of the DST record has the following format: 


Gwe ecwmewmonmme mannan emneeorcemr erm wmeore ere sececm semen ese memeaneseceeone eeeoeoeoeoe + 


long : DSTSL_BLI_BITVEC_SIZE ' 


wwe meme wee we men mee we ewe cee eee meee ores ec eee mee meme mewn nemo neem sen} 


If DSTSV_BLI_STRUC has the value DSTSK_BLI_BLOCK, the variable-length 
portion of the DST record has the following format: 


bem ew een ee men en mene me ee ewe me ewe ee eee eee ewe Be Be ewe ee wet ] 


long i DSTSL_BL1_BLOCK_UNITS : 
byte i Unused i DST$V_BLI_BLOCK_UNIT_SIZE : 


If DSTSV_BLI_STRUC has the value DSTSK_BLI_BLKVEC, the variable-length 
portion of the DST record has the following format: 


— eee eee eee ee eS ee eee eee eS eee See eee eee eeseeeseeseeeooeces eoeceeons 
long ‘ DSTSL_BLI_BLKVEC_BLOCKS ' 
long DSTSL_BLI_BLKVEC_UNITS : 
byte 4 DSTS$B_BL1I_BLKVEC_UNIT_SIZE H 


pot tne the fields in the header portion of the BLISS Special Cases DST 
ecord. 


FIELD OSTSBLI_FIELDS = 
SET 


SOOCOOOOSOOSOOOOSOCOOSOSOOSOSOSOOSSOOooooooooCoooOOoOOOOOOOOOOOOOOoOO 


———— ——— — — —53 


1b-se Sep-1 ; Bliss-32 v4. P 8 
18-8887198e $3:25:99 — “S¥sb bob As 8 toeeve: “SaCibsrmecens.neat°* (58) 
783 DST$B_BLI_LNG ={ 2,868.1], ' Length in bytes of ney set of 
7 ; fields between this one 
785 : and RAIL_FIELDS 
7 ' between 35 an 
f DSTSA_BLI_TRLR1 =(3,A,1, ! The first vette. ! of this 
: location + pul LNG 
7 DST$B_BL1_FORMAL o€ BG. ds ! Flag set if this. ; vast Sa 
7 ; routine forma paraneter 
791 DST$B8_BL1_VFLAGS = f 4, BL }: ' Value access informat 
138 DST$B_BLI-SYM_TYPE 2t 3. G, Je ' The type of the BLISS symbol 
79 : —22. A. the fol- 
; low ng sub-fi de: 
DSTS$v -BLI_STRUC = » V.40,3) J, ! The syrur cure of this spent 
Unused - » V.(5,4) J, ! This field Must Be Zer 
—8 -BL1_REF = » ViC7,1) : ! Flag set if this is a “REF 
H 1s = REF, 0 = no REF) 
DSTSA_BLI_SYM_ATTR =(€C6,A, J] ! Address of variable len * 
attribute segment 
res : this DST record 


} These are the possible values of the DSTS$B_BLI_STRUC field. 


=SSSeSrooosseseee 


öOOSOSOOOIOIOOOIO?:OOOIO)DOOICOIOOOOOOOOOIOOCSOOSOOOOSOOSOOSOOOIOOCOIOOCOIOOCOIOOCOIOOI)OCOOODCOOVISO 


LITERAL 
psTsK Bt 1 ps taut = 0, ! Not a BLISS structure 
DSTSK_BLI_VEC 2%, ! BLISS Vector 
10 DSTSK_BLI-BITVEC = ¢- ' BLISS Bitvector 
B11 DSTS$K_BLI_BLOCK = $, ' BLISS Block 
tt DSTSK_BLI-BLKVEC = 4; ' BLISS Blockvector 
814 
B15 ! Define the fields in the variable-length part o BLISS Spec tat Cases 
518 ! DST record when the value of the BLISV_BL *cFRUC "oud is DSTSK_BLI_VEC. 
+ } This field describes a BLISS Vector. 
si FIELD DSTSBLI_VEC_FIELDS = 
821 DSTSL_BLI_VEC_UNITS *€ 6. 4. 3, : Number a olonents allocated 
: vector 
: § DSTSV_BLI_VEC_UNIT_SIZE = (C 10, v_(0,4) ‘ : Wey vec sor a unit 
: 8 ae 
+: 5 ord, ang & "= longword 
B26 DST$V_BLI_VEC_SIGN_EXT = (C 10, V_(4, 4} ! Sign extension Lag: 
BO; 1 = sign —— on 
+ : 0 = no sign extension 
+: TES; 
ttt 
8 § ' Define the fields in the variable-length part o 2m $s Spec tal Cases 
+: ! DST record when the value of the BLISV_BL *cFRUC "eu s DSTSK_BLI_BITVEC. 
: : This field describes a BLISS Bitvector. 


FIELD ostseul_ BITVEC_FIELDS = 


pets. BLI_BITVEC_SIZE = C 6, L_ ] ! The number of bits in the bitvector 


WN 


— AAA Ed 
NOUR WN OORDNOUE 


Be Ge Se Ge Se Ge Se Be Se Ge Se Se Se Se Ge Se Ge Se Ge Ge Se Se Se Ge Ge FH Se Se Se Se Se Se Ge Se Ge Se Se Se Se SF SF Se Se Ss Ge Se Se Se SSS Se Ss Se Ge Se Sees 
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8 
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Define the fields in the variable-length part of the BLISS seec tet Cases 
DST recore when the value of the BLISV_BLI_STRUC field is DSTSK_BL1_BLOCK. 
These fields describe a BLISS Block. 


' 
i 
i 
i 
FIELD BSTS9L! BLOCK FELDS = 


DSTSL_BL1_BLOCK_UNITS =(€6, tL. 1], ! The number of units allocated 
i in the bloc 


DSTSV_BLI_BLOCK_UNIT_SIZE = C 10, v_(0, 4) ] ! The unit size of the 
block: 1 = byte, 2 = 
tes: word, and 4 = Longword 


Define the fields in the variable-length part of the BLISS Special Cases 
DST record when the value of the BLISV_BL *STRU C field is DSTSK_BLI_BLKVEC. 
These fields describe a BLISS — 8 


IELD DSTSBLI_BLKVEC_FIELDS = 


' 
i 
i 
i 
F 


DSTSL_BLI_BLKVEC_BLOCKS =(€6,Lt.1], The muster of blocks in the 
ockvector 
DST$L_BLI_BLKVEC_UNITS = { 10, i The number of units per block 
DST$B_BLI-BLKVEC_UNIT_SIZE = C{ 14, 5° 1 The block unit size: 1 = byte, 
2 = word, 4 = longword 


TES; 


! Define the fields in the first trailer portion of the BLISS Special Cases 
DST record. Also define the declaration macro. 


FIELD OSTSOL! TRAIL FIELDS = 


DSTSL_BLI_VALUE = (C 0, L_ J, ! Value longword, interpreted 

i according to contents of 

i DST$8 BL VFLAGS 
DST$SB_BLI_NAME = ( 4, B_ J, Count byte. of The syabel name 
DSTSA_BLI_TRLR2 = ( 5, A_ J i The second trailer starts at this 
Tes : location + DST$B8_8L1_NAME 


MACRO 
DSTSBLI_TRAILER1 = BLOCKC BYTE) FIELD(DSTSBLI_TRAILI_FIELDS) 2%; 


! Define the fields in the second trailer portion of the BLISS Special Cases 
: DST record. Also define the declaration macro. 
FELD OSTSOLI_TRAIL2 FIELDS = 
bs {$l 6L1_ SIZE ={C0,t.] ! Size of the Bliss data item in bytes 


J 
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° 
o 
© 
. 
. 
. 
. 
o 
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MACRO 
5 DSTSBLI_TRAILER2 = BLOCKL BYTE) FIELD(DSTSBLI_TRAIL2_ FIELDS) 2; 


~$e0-1984 33:0 VAK=11 BLiss-32 V4.0- 
beste 801 38e 83:25:98 | Set BAS ES ree auc: “SRCIDSTRECRDS. neon (503 
THE BLISS FIELD DST RECORD 


The BLISS Field DST record describes a BLISS field wre Paith field 

names are declared in FIELD declarations in BLISS. Each a59 field 

—* is bound to an n-tuple of numbers. Upue ly the — * 5 ete 
e ang the numbers represent a byte or — offset, ¢t e bit 

ice thin that byte or Longuord. the b ength of the Held betne 

described, and a sign-extension flag. DEBUG supports references to 

such fields in 8 2 Blocks and — owever, a BLISS field 


SESSSeoRsSs 


can be any n-tuple. If n is not 4, the field name can only be used in 


IELD OS TOL IFLOL FIELDS = 


3 — 
DSTSL_BLIFLD_COMPS 
DST$B_BL IFLD-NAME 


' Unused--Must Be Zero 

' The number of components 

' The count byte of the field 

: name Counted ASCII string 


“un 
—N 
—e 
— — — 
orw 
te 
a) 
⸗— 


TES; 


3 : H 

' . 
⸗ ; : 
° ; : 
3 i ; 

' . 
: 
⸗ 
30 EXAMINE commands, but not in Block or Blockvector references. : 
: a i The BLISS Field DST record should not be generated for any Language : 
: 91 : other than BLISS. This is the format of the record: : 
BER : 
3 37 i byte : DSTSB_LENGTH : 3 
3 319 0 =} byte } DSTSB_TYPE (= DSTSK_BLIFLD) i 2 
: 3921 i byte } DST$B_BLIFLD_UNUSED ; 
3 9 ! long : DSTSL_BLIFLD_COMPS : : 
3 9 4 ' 4 3 
925 ! byte : DSTSB_BLIFLD_NAME : : 
3 9 8 ‘ver } : : 
3 M : ‘ The Name of the BLISS Field in ASCII ' : 
: $930 0 ; ; (The name's Length 1s given by DSTSB_BLIFLD_NAME) ; 
os: & i ; 
i 9938 — — 
9 ! var : : : 
3 M 5 A Vector of Longwords Containing the Integer : 
: i . Values of the Components of the BLISS Field Definition 2 
: $959 ; { (The number of values is given by DSTSB_BLIFLD_COMPS) = 3 
> 3941 i : 
3 942 : Pemmeme we wee ween w new eneecwew wr eww ec wec esos oe ccoccocece 264 
a 
; 3945 i F 
: 94 Define the fields of the BLISS Field DST record. : 
: f ; 


8 
15-sep-1984 33:05:98 | “Shs bsp OAs8 toteuc: snc iostREcRDs.rears@* (575 
LABEL DST RECORDS 


2222 


DONO 


Labels are represented by two different DST records. A label, in the 
sense mee here, is a *2* bound to an instruction address. Labels 
nclude routine, lexical block, and orice point symbols, however. 
el can be represented by either a Label DST record 7 @ Label-or- 
Literal OST record. The Label-or-Literal DST record is 


ntended only 
for Language MACRO, it appears. (The histor 


4 on the origin and intent 
of this record is unclear, however.) All other Languages should use 
the Label DST record for labels. 


SESSEZES 


$ ‘ 
1 
i 
. 1 
i 
4 i 
r4 i 
— i 
: : i 
1 
J 
— 968 ! 
3 444 ‘ 
3 39 THE LABEL DST RECORD 
; 978 i 
3 97 ‘ The Label DST record specifies the name and address of a label in the 
3 974 0 : the current module. A Label in this sense is always bound to an in- 
3 975 0 : struction address, not a data address. This is the DST record normally 
3 376 0 ; used for labels in high-level ey te The DSTSL_VALUE field of this 
3 33 — record contains the code address to which the label is bound. 
: 979 9 This is the format of the Label DST record: 
; 3981 ‘ 
$ st 8 byte H DSTSB_LENGTH : 
; 985 byte i DSTSB_TYPE (= DSTSK_LABEL) i 
: 387 ; byte H Unused--Must Be Zero H 
; 989 Long DSTSL_VALUE : 
: 3991 i byte | DST$B_NAME 
: 99 ! var : : 
: 83 The Label Name in ASCII ‘ 
; | 4 ; (The name's Length is given by DSTSB_NAME) 
; 998 0 i 
e $ $e er wre esr mw ene nrerawa wn een eere renew er eer rete mne nn ewe wwe nee ere re mee $ 


—EF —RX $3: oh: 9 — ——— SRCIOSTRECRDS. Rea: i 9 58) 


; 7800 : THE LABEL“OR-LITERAL DST RECORD 
: 400¢ 
; 400 ! The Label-or-Literal DST —2* specifies the name — re of a 
; 4004 : Label (meaning a code location) or the aoe and value of an inte 3 
3 4005 ! Literal (a named constant). It is B+. tirely clear ~ i this D 
; «64 ‘ record Orjets since labels can be described by Label DST —— onl 
; 400 é integer Li sore : cen be descr ibeg with, Standard Data DST records. 
3 8 Most Likel a groeere was intended for Lanquege MACRO where 
J 4 ! there is | atte “atstinet I * labels and | ferals: one is relo- 
: 6010 0 i catable and the other that is about all. If DSTSV_VALKIND 
$ rete 8 : has the value DSTSK CAL KIND «hope the symbol is a label ond if-it has 
; 6 \¢ ' the value DSTSK_VALRIND_LITERAL, the symbol is a literal. The 2 
s 601 ‘ of the label ae “the — of the Literal is found in the DST$L_VALUE 
; 40146 : field. It is recommended that highslevel languages avoid this DST 
: ' record and use the Labe record or the Standard Data rec 
4015 ! d and the Label DST d the Standard Dat ost ord 
3 £08 8 instead. 
; 4018 O ‘ This is the format of the Label-or-Literal DST record: 
BBB 
: 3 § 8 byte : DSTSB_LENGTH : 
4 — — —— — — — — ——— — ü⏑ 0⏑ü ⏑ — —————————————————— 
8 0 ! byte DSTSB_TYPE (= DSTSK_LBLORLIT) ' 
: 4026 0 ' byte : Unused--Must Be Zero t DSTSV_VALKIND | 
4 ret 34 0 ' fous eananweane = me Gt fe — cme — Semen oa eee wena roeenmaaae own ae =e eueeseesses 
3 4028 0 ! long : DSTS$L -VALUE H 
° t's 34 0 ' dewseevesousencecsoseeeseesooeceesee Se ee oe ce — reasreaeocsre sow onmmocnrecoe + 
; 4030 0 ‘byte } DSTSB_NAME 
3 eth 4 foeoceaoe — — — — — — CSP ee See Sew ee sor OOM EO MR 2 —2—— rs 
; ! var : ‘ 
: 4038 4 The Label or Literal Name in ASCII 
; 4035 0 : : (The name's Length is given by DSTSB_NAME) 
; 6036 0 ! ; ; 
; 6037 0 ! : : 
3 4038 0 ' bweosrmooce nwo aera nner now ae Sermo er nr emrnareceanzaonwnnaceaes Seas enweoswmeaewe ate noe a + 


— — 


: 
| 
| 
| 
| 
| 


byte 
byte 
byte 


FRLRRALRRADR EE PEEP EEE ER 
00 ——0 


Long 
byte 


Fk tal tal ak el ak tel ek el el el eek a el ek ee 


var 


0O00000000000000000000000000000000 


Be Se Oe Ge Se Oe Se Se Se Ge Ge Ge Ge Se Se Se Ge SF Se Se Se Se Se Ss Se Ge Ge Ge Ge See Se esas 


THE ENTRY POINT DST RECORD 


The Entry Point DST record describes an ENTRY name in the FORTRAN ~ 


PL/I sense. in¢ other words, it describes a secondary entry point 
the routine w 

never be generated for the main *1 point to a routine since t 
entry point is already described by the Routine Begin DST — 


entry point described by the entcy coint DST record is always assumed 


e called through the CALLS/CA G instructions (not JSB/BSB). 
pst L VALUE field contains the address of the entry point. 


This is the format of the Entry Point DST record: 


FSB BDE OB Be wee DQ BOSD ESE SBS WE & wo em wa Se Se we em oe oe t 


DSTSB_LENGTH 


poorer sce wranenronemnannranmeranae mascara sean an cscen ween nee awoeoean mena nee $ 


DSTSB_TYPE (= DSTSK_ENTRY) 


wasn äG anne scaene se sete en en seer ee eee se DO eeSoees ewe es neo weanrasnenaease + 


: Unused--Must Be Zero : 


2— — 2— aonaeoer ses ese ast 2— eececee eae non= + 
i DSTSL_VALUE ' 
: DSTSB_NAME : 
doraemon sero re — anne come rawr e ncn es nrean eae eae ewrenreeernrn sae eeeceeoa + 
The Entry Point Name in ASCII 
(The name's Length is given by DSTSB_NAME) 
ane eeerereerceoeee= ea eer aoanree eee eo eee mee te Bee eee eS @eewreoonoaqane2wroe zee coe e ew = 4 


SETI SE ED SOL — 


WSoseoct9ne 25:01:08 uzueh 


thin which this DST record is nested. This record should 


=32 V4.0 


: COEBUG. ORCIOSTRECRDS. Rea: ee 


ara 


Bae Be Oe Se Se Be Oe Se Se Se Se Se Se Se SH Se Se Se Ge Se FH SH Se Se Ge Se Ge FH FH Se Se Se Ge Se Se Se Se Se Se Se Se Se Se Se oe Fe Se Se Se Se SH Se Se Se Se eae 


3 


öOSOSOSOOOIOOIOOIOOISOIOOOOOOOOOOOOOOOOOOOOIOOCOOOIOOCOOOOOOOOOOOOOOOOCOOIOOI OO 


Fo oY oY oF oY ot ot ot ot ot ot ot ot et et et ee ek ek 
— — — — — — — — — — — — — — — — — — — — — — — — — — — — — — 
— —— ——— ee rium 
S I—— ⏑——— 


byte 
byte 
byte 
Long 
byte 


var 


Long 


Define 


— — — ee ee ee eee — — — — — — — —— 


uzez 33:01:08 ay 


THE PSECT DST RECORD 


ay PSECT DST record specifies the name, og ng length of 
PSECT, where a PSECT is a Program Section in the. t nker™ sense. 
PS SECT DST records are only used for Language MACRO were i 18 
possible to generate code or data at the beginning of a P 
without having ony other Label on that code. BUG i caren COsect 
DST records for all other senguepes since high-level languages 
have other code and data labels that are more appropriate. 


This is the format of the PSECT DST record: 


+ —— —— —— —— — — —— 2 2 — — — 2 —22— ++ 


' DSTSB_ LENGTH ' 


pee mews r mre en wees memo — Oana ner mace a ame ew oem eames eececece 22224 


DSTSB_TYPE (= “DSTSK_PSECT) ' 


eee eto — E BEST Oane Deane en Dae neoawrawraaweswnoaae > 


H DSTSK_PSECT_UNUSED ' 


fee wens m ena nt en an serene eae rn ene ran nmmanrensreseanraenonnaa neces + 


: DSTSL_PSECT_VALUE 

tw" bSTSEPSECT NAME (also DSKSB_PSECT-TALA_OFFS) MOG: 
DSTSA_ PSECT_ _TRLR “BASE 

The Name of the PSECT in ASCII 


(The name's length is given by DST$B_PSECT_NAME) 


eee reer oe eww eee sewer ero nec eno eee eee oce SOS SSS ⏑ ⏑ — — SO“ &O&& 


DSTS$L -PSECT “SIZE 


oe nee monet emer On BE MBO ER OO MEE RRO EEE OEE eS Se oe oe seecee 


} oo } cocescccceccce } on $ oo 


the fields of the PSECT DST record. 


FIELD OST orsect. FIELDS = 


DST$B_PSECT_UNUSED 
DSTSL~PSECT~ VALUE 
DSTSB~PSECT~NAME 
DST$B_PSECT_TRLR_OFFS 
DSTSA_PSECT_TRLR_BASE = 8, 


TES; 


' Unused--Must Be Zero 
' Start address of the PS 
' The coutn byte in the P 


1 
— 
— 


' Byte offset to the PS 
: record trailer fie 
' Base address for offset t 


nun 
ane 
WW 
—— s+ & 
> @®@ @orw 
11 
ss ts tt 
.* > 


! Defing the PSECT DST record trailer fields. Also define the declaratio 


: macro. 


$25 53 


ECT 
SECT 


lds 


i 

' 

' 

: name COunted ASCII string 
ECT DST 

i 

' 


n 


1 BLi 
30042 


to 
DST record trailer fields 


=32 V4.0-74 
: (DEBUG. SRCIOSTRECRDS. Rea: = 


95 
* (60) 


— — e — Paks ea - 
| —— Bebe gtle: snc iosTREcRDS.neast”* coos 


FIELD DSTSPSECT_TRAILER_FIELDS = 
Da TSLPSECT SIZE *t0.t, 2 ! Number of bytes in the PSECT 


wn 


MACRO 
DSTSPSECT_TRAILER = BLOCK BYTE) FIELD(DSTSPSECT_TRAILER_FIELDS) 2; 


: Note that the address of the PSECT DST record tailer is computed as follows: 
i DST_RECORD(CDSTSA_PSECT_TRLR_BASE] + .DST_RECORDCDSTSB_PSECT_TRLR_OFFS) 


Det ee ee ee ee ee ee 
Ok et et a ed ed 
“ 


— — 


9 
15-sep-19 4 23:01: VAX-11 Bliss<-32 V4.0-742 Pa 97 
1 333 35:03:98 825 $DUA2B : (DEBUG. SRCJOSTRECRDS.REQ: 1" (61) 
LINE NUMBER PCH CORRELATION 
DST RECORDS 
The Line Number PC-Correlation DST record specifies the correlation 
between Listing Line numbers, as assigned by the compiler, an 
addresses. It thus the means whereby the compiler tells 5EBUG where 
the generated object code for each source Line starts and how lon 
it is in bytes. This is the format of the Line Number PC-Correlation 
DST record: 
4 OCR OMDB ESO SHO SDE ABE STE MO DS EES SEAS EHO HEME DAME NODE BeEE Deane area at 
! byte : DSTSB_LENGTH i 
i byte : DSTSB_TYPE (= DSTSK_LINE_NUM) : 
iyvar } 
One or More Line Number PC-Correlation Commands ‘ 
——— — —— —— — 


contains a sequence of Line Number PC-Correlation commands. Each such 
command sets or manipulates one or more state variables used by DEBUG 
in the interpretation of these commands. The main state variables are 
the current Line number and the current PC address, out there are seve- 
ral others as well. e exact semantics of the various commands are 
described in the sections that follow. 


Line Number PC-Correlation DST records are associated with the module 
within which they appear. The must thus ** between the Module 
Begin and the Module End DST records for the current module. There are 
no further restrictions on where fhey may appear, however. In particu- 
lar, they need not be nested within the routines or lexical blocks that 
Fhey describe. It is thus legal to generate all Line Number PC-Corre- 
lation DST records for a module after the last Routine End DST record, 
for instance. These records can also be interspersed between Routine 
and Block Begin and Eng records in any way convenient for the compiler 
implementer. However it is done, DEBUG treats them as belonging to the 
module as a whole. 

The Line Number PC-Correlation information ney be spread over as many 
DST records as necessary. No Line Number PC-Correlation command may be 
broken across record boundaries, but otherwise the Line Number PC-Corre- 
lation DST records within a module are considered to constitute a single 
command stream. The Continuation DST record may not be used to continue 
Line Number PC-Correlation DST records. 


' 
! 
1 
1 
1 
1 
! 
1 
' 
1 
! 
1 
' 
' 
1 
1 
1 
1 
4 
1 
1 
1 
t 
1 
1 
1 
After the two-byte header, each Line Number PC-Correlation DST record 
1 
1 
t 
' 
1 
1 
t 
' 
t 
1 
t 
! 
1 
i] 
1 
1 
1 
' 
' 
1 
' 
1 
1 
‘ 
1 
' 
' 
! Define the fields of the Line Number PC-Correlation DST record. 


Oe Be Be Oe Oe Oe Be Se Se BF Ss Se Se Se Se Se Se Se Se Ge Se FH Ss Oe se Ge Se Ge Se FF 2 Ss Be Se Ss Se Be Se Se Se Se Se OFS OF Se Oe Se Se Se SESH Sees Sears 
Foy oY ot le oY ot ot oe ot at ot ot ot ot ot ot et ee ee ee kk ek ke ee ek ee 
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Brae raat a eee eee: — 


— DD—— 


: 6199 

FIELD OSTS1 INE NUM_FIELDS = 

: 2 § Fee snot IE IAM PATA =(€ 2, A. ] ! Start address of PC-correlation data 
— 

31 

3 2 08 : LINE NUMBER PC-CORRELATION COMMANDS 

i 4 ; 

: 6210 : Each PC-Correlation command consists of a command byte possibly fol- 

3 4211 : lowed by a parameter byte, word, or longword. The presence, size, and 
. < ig i meaning of the parameter field is determined by the command byte. This 
; 2 + 8 } illustration summarizes the structure of one command: 

OFS ee er 

; 4 Hi 0 i byte} COMMAND _BYTE i 

: 6219 0 iver} 

3 ? , 8 } ' Zero or One Parameter Field 

: 4 ¢ 0 ‘ (Byte, Word, or Longword) 

3 4 0 ' : H 

; 6226 0 : : : 

4 : 5 8 Fewer eooe me secon ee sre DOB Be OOP eE Se MADD SOME O ODOM moewe — — — — — — 222222 
fe 8 

: 4229 i The command byte contains a command code. If this command code is 

; & ‘ negative, this is a Delta-PC command. A Delta-PC command specifies 

$ 4231 ‘ by how * bytes to increment the PC to get to the start of the 

> § ! next Line (see detailed description below). This byte count is en- 

; ¢ : coded 246 in the command ytes If the command code is negative, 

; 4 8 ‘ its negative is the PC increment. The Delta-PC command has no param- 
; 6235 ‘ eter field. If the command code is positive, it specifies some other 
Tae 8 ¢ command as described below. In this case, there may be a parameter 

3 : 7 field, depending on the command code. 

Bee 

. Ont i Define the command codes allowed in Line Number PC-Correlation commands. 

: «64242 : If the command code is zero or negative, the command is a one-byte Delta-PC 
3 e re : command. Here we define the command-code range for the Delta-PC command. 
$6265 LITERAL 

: 426 DSTSK_DELTA_PC_LOW = -128, | The lower bound on Delta-PC commands 
3 : ; DSTSK_DELTA_PC_HIGH = 0; ' The upper bound on Delta-PC commands 
626 

; 6250 ! Define the PC-correlation command codes other than the Delta-PC command. 

3 : 1 These command codes are always positive. 

RIE LITERAL 

: 4254 DSTSK_DELTA_PC_wW = 1 ! Delta-PC Word command 

; 4255 DST$K-DELTA-PC“L = 17, | Delta-PC Longword command 


| 


— — — — — — 
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§ DSTSK_INCR_LINUM = 2, ! Increment Line Number Byte command 
DSTSK_INCR_LINUM_W = ! Increment Line Number Word command 
8 DSTSK_INCR_LINUM_L = 18, i Increment Line Number Longword command 
9 DS TSK 361 CI NUA_INCR = 4, ' Set Line Number Increment Byte command 
60 DSTSK_SET Set INCR.W = 5, ! Set Ling Number Increment Word command 
61 DSTSK-RESET_LINOM_INCR = g. ' Reset Line Number Increment command 
8 DSTSK_BEG_STMT_MODE = 7, ! Beq n Statement Mode command 
6 DSTSK_END_STMT MODE = $ : End Statement Mode command 
64 DSTSK-SET-STMTRUM = 18, i Set Statement Number Byte command 
65 DSTSK_SET_LINUM_B = 19, ! Set Line Number Byte command 
28 DSTSK_SET_LINUM = 9 ! Set Line Number Word command 
6 DSTSK_SET-LINUM_L 2 #6. i Set Line Number Longword command 
68 DSTSK_SET_PC = 10, ! Set Relative PC Byte command 
9 DSTSK_SET_PC_w = 11, ! Set Relative PC Word command 
0 DSTSK_SET_PC L = 12, ! Set Relative PC Longword command 
DSTSK_SET-ABS_PC = 16, ! Set Absolute PC Longword command 
DSTSK_TERA = 14, ! Terminate Line Byte command 
DSTSK_TERM_W = 15, ! Terminate Line Word command 
DSTSK_TERM_L = 21, Terminate Line Longword command 
DSTSK_PCCOR_LOW = -128, ! Smallest value allowed in the fi:st 
, yte of a PC-correlation command 
DSTSK_PCCOR_HIGH = 21; ! Largest value allowed in the first 
: byte of a PC-correlation command 


The parameter field, if present, contains an uns teed byte, unsigned 
word, or longword value. The possible PC-Correlation command formats 
thus look as follows: 
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' 
i 
i 
i 
i 
i 
! byte ; COMMAND _BYTE : 
' bow wmer ew eo enme ener emer re nen osc er em nec oe men won wemor enero wroneaaw eeeceoe meh 
1 
i 
i byte } COMMAND _BYTE : 
byte NEXT_UNS_BYTE (Unsigned Byte Value) i 
i byte COMMAND _BYTE i 
word i NEXT_UNS_WORD (Unsigned Word Value) i 
i byte : COMMAND _BYTE : 
; long } NEXT_UNS_LONG (Longword Value) 
; 
; 


— 4 
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PC=CORRELATION COMMAND SEMANTICS 


The individual commands are described es * To clarify what 
these 22* oc tually, do, each is followe wer semantic de- 
scription using yo ike Yt pee ghee: Fr This 1 on show what the 
command does to a number of state variables used by EBUG when inter- 
preting these commands. The state variables are the following: 


CURRENT_LINE == The current Line number. 

CURRENT. STMT — The current statement number. 

CURRENT_INCR <= The current t ne number increment. 

CURRENT_STMT_MODE <= The Stecengnt mode logs 8 set to TRUE when 
statement mode is set, set to FALSE otherwise; 

START_PC -- The start address 4 the lowest-address routine 
n the current 

CURRENT_PC <== The ryrrent PC vatue "teote address). 

CURRENT_MARK <= oe Line-open/Line-closed flag; set to LINE —— 

when Line numbers are being defined and set to 

LINE CLOSED when a routine has been terminated 
and fnew Lines are not being defined. 


The initial values of these state variables when the PC-Correlation 
commands for a given module are interpreted are as follows: 


CURRENT_LINE = 0; 
CURRENT-STMT = 1; 

ENT“INCR = 1: 
CURRENT STMT_MODE = FALSE; 
START_PC = Sfart address of the Lowest-address 

fous ine in the current module; 

— PC = START P 
CURRENT_MARK = LINE_ CLoseo; 


The sections below describe the format and semantics of each of the 
individual PC-Correlation commands. 


Bete Fe Se Se Ge Se Ge Ge Fe Se Ge Se Fe Se Ge Fe Se Se Se Se Ge Ge Se Se Se Se Se Ge Se Ge Fe S4ee Ge Ge Se FHS Se ae 


THE DELTA=-PC COMMAND 


This command defines a correlation between a Line oy 14 and a PC 2* 
The current Line number is incremented by the current increment value 
(normally 1) and the current ec “tine is incremented t the nopet ives of 
the command byte. The resulti ng t = oom —* pes he foew me 
value. In other words, both t ber and the PC value are incre- 
mented before the eh Nps 4 md 1J sorrel shed. The PC increment value 
(the negative of the command code) thus spec ities how many bytes to go 
forward to get to the start of the Line being defined. These are the 
formal semantics of the command: 


4 CURRENT STAT RODE 
CURRENT_STMT = CURRENT_STMT + 1 
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© CURRENT _LINE = CURRENT_LINE + CURRENT_INCR; 


CURRENT_PC = CURRENT_PC = PC_COMMANDCCOMMAND BYTE); 
CURRENT_MARK = LINE_OPEN; 


ELS 


The value of CURRENT_PC now contains the start address of the Listing 
Line specified by the values of CURRENT_LINE and CURRENT_STMT. Note 
’ that Line-open mode is now set. 


pe i | 
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THE DSTSK_DELTA_PC_W COMMAND 


VEN 


This command is Like the normal Delta-PC command except that the PC 
increment value is given in an unsigned word following the command 
code. These are the semantics: 
IF CURRENT_STMT_MODE 
CURRENT_STMT = CURRENT_STMT + 1 
CURRENT_LINE = CURRENT_LINE + CURRENT_INCR; 


CURRENT_MARK = LINE_OPEN; 
CURRENT_PC = CURRENT_PC + PC_COMMANDCNEXT_UNS_WORD); 


4400 

rent The value of CURRENT_PC now contains the start address of the listing 
44 ¢ Line specified by the values of CURRENT_LINE and CURRENT_STMT. Note 
440 that Line-open mode is now set. 

4404 

‘it 

4G THE DSTSK_DELTA_PC_L COMMAND 

4209 

4410 This command is Like the normal Delta-PC command except that the PC 
4411 increment value is given in an unsigned longword following the command 
rh | code. These are the semantics: 

441 

4414 

4415 IF CURRENT_STMT_MODE 

re} THEN 

441 CURRENT _STMT = CURRENT_STMT + 1 

meh} | ELSE 

4619 CURRENT_LINE = CURRENT_LINE * CURRENT_INCR; 

4421 CURRENT_MARK = LINE_OPEN; 

* § CURRENT_PC = CURRENT_PC + PC_COMMANDCNEXT_UNS_LONG); 

BEEK 

4425 The value of CURRENT_PC now contains the start address of the Listing 
4426 Line specified by the values of CURRENT_LINE and CURRENT_STMT. Note 
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that Line-open mode is now set. 


THE DSTSK_INCR_LINUM COMMAND 


This command increments the current Line number by 
the unsigned byte following the command code. | 
the current statement is reset to 1 as well. Thes 
semantics of the command: 


1Eesen-1966 23:01:08 


the value gives ta 
statement mod 1 12%, 
e are the for#-: 


CURRENT LINE = CURRENT LINE · PC_COMMANDCNEXT_UNS_BYicJ; 
IF CURRENT_STMT_MODE TREN CURRENT STMT = 1; 


THE DSTSK_INCR_LINUM_W COMMAND 


This command increments the current Line number by 
the unsigned word following the command code. If 
the current statement is reset to 1 as well. Thes 
semantics of the command: 


the value given in 
statement mode is set, 
e are the formal 


CURRENT LINE = CURRENT LINE + PC_COMMANDCNEXT_UNS_WORD]; 
IF CURRENT_STMT_MODE TREN CURRENT_STMT = 1; 


THE DSTSK_INCR_LINUM_L COMMAND 


This command increments the current Line number by 
the unsigned longword following the command code. 
the current statement is reset to 1 as well. Thes 
semantics of the command: 


CURRENT LINE = CURRENT LINE + PC_COMMAND[N 


IF CURRENT_STMT_MODE TREN CURRENT_STMT = 1; 


THE DSTSK_SET_LINUM_INCR COMMAND 


This command set the current Line number increment 
specified in the unsigned byte following the comma 
ment mode is set, the current statement number is 

the formal semantics of the command: 


CURRENT_INCR = PC_COMMANDCNEXT_UNS BYTE); 
IF CURRENT STMT_MODE THEN CURRENT STMT = 1 


the value given in 
If statement mode is set, 
e are the formal 


EXT_UNS_LONG); 


value to the value 
nd code If state- 
set to i. These are 
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: 66 

; 6685 ‘ 

3 44 ' 

: a THE DSTSK_SET_LINUM_INCR_W COMMAND 

ee 

s : This ¢ and set the current Line number increme 

: 449) 8 3 unsigned word following the comand cose,” If’ states 
; rent : the formal semantics of the Ritcen mpg: — 50. OUR TP. — 
; 4495 ; 

3 : CURRENT_INCR = PC_COMMANDCNEXT_UNS_ WORD); 

; sc? IF CURRENT_STMT_MODE THEN CURRENT SIRT 21: 

3 4499 i 

s 65 ! 

: 4309 THE DSTSK_RESET_LINUM_INCR COMMAND 

.. @ i 

3s 63 ‘ This command resets th i 

338 ot tamed e current Line number increment value to 1. If 

; 450 ens ae BF. current statement number is set to 1 as well. 
Beg 

3 ‘ CURRENT_INCR = 1; 

; $219 IF CURRENT_STMT_MODE THEN CURRENT_STMT = 1; 

; 4318 i 

3 651 ‘ 

; 4316 S THE DST$K_BEG_STMT_MODE COMMAND 

NB 

3 4 This command sets statement mode, meani that b - * 
3 will Bow. the Fyrrent —* —“ iS te een 
5 2250 8 cane one not the current Line itself. This commené is only allowed in 
: $88 B | thae'navecRutetpterseatenents per Tings” this comming alse" set the'cars” 
: $2 g rent statement number to 1. these are the a Oe OR The gure 
: 43 4 i 

; 6525 ! IF CURRENT_MARK NEQ LINE 

, 3 ; YS 1 OPEN THEN SIGNAL(Invalid DST Record); 
; 43 $ ; CURRENT~STMT™= rE ——— 

43 i 

: 6 ' 

; $2 1 THE DSTSK_END_STMT_MODE COMMAND 

; 43 § ! 

3 This command clears statement mode so that that - * 
$2 5 Senge wil) ogete sacropent the current tine — gages yg Bap so ge 
; 45 2* —2— se e current statement number to 1. These 
$45 i 

; 6540 : CURRENT_STMT_MODE = FALSE; 
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CURRENT_STMT = 1; 


THE DSTSK_SET_LINUM_8 COMMAND 


This command sets the current Line number to the value specified in the 
unsigned byte that follows the command code. These are the semantics: 


CURRENT_LINE = PC_COMMANDCNEXT_UNS_BYTE); 


THE DSTSK_SET_LINUM COMMAND 
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This command sets the current Line number to the value specified in the 
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9 unsigned word that follows the command code. These are the semantics: 
456 
38 CURRENT_LINE = PC_COMMANDCNEXT_UNS_WORD); 
4565 
$286 
456 THE DSTSK_SET_LINUM_L COMMAND 
4568 
4570 This command sets the current Line number to the value specified in the 
$3) lLongword that follows the command code. These are the semantics: 
457 


CURRENT _LINE = PC_COMMANDCNEXT_UNS_LONG); 


THE DSTSK_SET_STMTNUM COMMAND 


oon ~ 
2832333 wr 
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This command sets the current statement number to the value specified 
in the unsigned word that follows the command code. The command should 
only be used when statement mode is set. These are the semantics: 


2228 


CURRENT_STMT = PC_COMMANDCNEXT_UNS_WORD); 
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THE DSTSK_SET_PC COMMAND 


282838288 


This command sets the current PC value to be the value specified in the 
uns ened byte following the command code added to the start address of 
the lowest-address routine in the current module. This conneng s only 
allowed in the Line-closed state. These are the formal semantics: 
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IF CURRENT_MARK NEQ LINE_CLOSED THEN SIGNAL(Invalid DST Record); 


. 1 
. i 
; 4600 CURRENT_PC“= START_PC + PC_COMMANDLNEXT_UNS_ BYTE); 
: 460 i 
; 460 ‘ 
3 8 THE DSTSK_SET_PC_W COMMAND 
: 46 i 
; 460 ‘ This command sets the current PC value to be the value specified in the 
; 4608 ! unsigned word following the command code added to the start address of 
$ 4609 : the lowest-address routine in the current module. This commend is only 
3 root allowed in the Line-closed state. These are the formal semantics: 
; 8 i 
; 461 8 ' IF CURRENT_MARK NEQ LINE_CLOSED THEN SIGNAL(Invalid DST Record); 
: red 8 } CURRENT_PC”= START_PC + PC_COMMANDCNEXT_UNS_WORDJ; 
: 4616 0 i 
; 4617 0 : 
: 34 THE DSTSK_SET_PC_L COMMAND 
: 4620 0 i 
3 4621 0 : This command sets the current PC value to be the value specified in the 
: 66 § 0 ‘ Longword following the command code added to the start address of the 
3 46 0 : lowest-address routine in the current module. This command is only 
3 re ¢ 8 } allowed in the Line-closed state. These are the formal semantics: 
: 4626 0 i 
; 4627 0 ' IF CURRENT_MARK NEQ LINE CLOSED THEN SIGNAL(Invalid DST Record); 
; £608 8 : CURRENT_PC™= START_PC + PC_COMMANDCNEXT_UNS_LONGJ; 
; 10% 0 i 
: 4631 8 ‘ 
3 8 THE DSTSK_SET_ABS_PC COMMAND 
> 4634 5 i 
: 4635 O ! This command sets the current PC value to be the absolute address speci- 
; 4636 : fied in the longword following the command code. This command is only 
3 4638 allowed in the line-closed state. These are the formal semantics: 
: 4639 i 
; 6640 ‘ IF CURRENT_MARK NEQ hy CLOSED THEN Gems (invent £6 DST Record); 
3 reek. CURRENT_PC”= PC_COMMANDCREXT_UNS_LONG); 
$664 i 
: 4644 4 
3 —8 THE DSTSK_TERM COMMAND 
$4646 i 
: 6668 $ This command terminates the PC-Correlation command sequence for the 
3 ©4649 . gurrent routine or other program unit and specifies the number of bytes 
; 650 . n the Last i tae spec itied by a Delta-PC command. Since the Delta-PC 
3 6651 : command specifies how many aytes precede the Line being defined, the 
: 465¢ i Terminate command is needed to say how many bytes are in that Line 
3; 46 : (i.e., how many bytes will increment the PC to the first byte past the 
; 64654 4 current program unit). The number of bytes in the last Line is speci- 
| 
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fied by the unsigned byte following the command code. This command also 
sets the Line-closed state. These are the semantics of the command: 


CURRENT_PC = CURRENT_PC + PC_COMMANDC(NEXT_UNS_BYTE); 
CURRENT_MARK = LINE_CLOSED; 


THE DSTSK_TERM_W COMMAND 


This command terminates the PC-Correlation command sequence for the cur- 
rent routine or other program unit and agec ities the number of tes in 
the Last Line of that program unit. It is a variant of the DSTSK_TERM 
command described above. The number of bytes in the last Line is speci- 
fied by the unsigned word following the command code. This command also 
sets the Line-closed state. These are the semantics of the command: 


CURRENT_PC = CURRENT_PC + PC_COMMANDCNEXT_UNS_WORD); 
CURRENT_MARK = LINE_CLOSED; 


THE DSTSK_TERM_L COMMAND 


This command terminates the PC-Correlation command sequence for the cur- 
rent routine or other program unit and agec St ios the number of bytes in 
the Last Line of that program unit. It is a variant of the DSTSK_TERM 
command described above. The number of bytes in the last line is speci- 
fied by the longword following the command code. This command also sets 
the Line-closed state. These are the semantics of the command: 


CURRENT_PC = CURRENT _PC + PC_COMMANDCNEXT_UNS_LONG); 
CURRENT_MARK = LINE_CLOSED; 


—n—————————————————⸗—⸗——————————⸗⸗⸗ 


0 
3 
; 6 
; 0 
; 4675 0 
: 0 
: 0 
; 0 
: 0 
; 0 
; 0 
; 0 
; 0 
; 0 
; 0 
: 0 
; 0 
: 0 
: 0 
: 0 
: 0 
; 0 
: 0 
; 0 
: 0 
. 0 


i END OF LINE NUMBER PC=CORRELATION DST RECORD DESCRIPTION. 
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; 4697 : SOURCE FILE CORRELATION 
' 
; 4899 ; DST RECORDS 
oo 
; i h File Correlation DST record is used to specify the correla- 
: 838 i Fan beneven Listing Line numbers on the one hand and source files and 
: 4705 0 ; source file record numbers on the other. These records enable DEBUG 
: 38 to display source lines during the debugging session. 
' 
; 4708 8 ‘ The Source File Correlation DST record has the following format: 
; «647 ; 
: ont ¢ 8 byte i - NST fea TOO a aot A SD Sn et eeeeecee : 
fe Bi byte OSTS0_TVPE_(= DSTBK_SOURCED —— 
3 471 5 0 ' eg moeeon — — ——— Seeeeeeeeeeonoeneneneaneneo eeeeoceoe - 
Se hoe : 
; aE 9 A variable number of : 
; a 0 0 i Source File Correlation commands 
wil | : 
: 47 ¢ 0 i H eseeoeoeoee 2 SSO OS — — 2 eee ewaenn ew — 2 — wen wre wewmrawan = ——26 
; as oI 
; h h and DST type bytes, the record consists of a sequence 
; 33 2 HTS Correlotion commands, These commands specify what source 
; 33 0 ; files contributed source Lines to this module and how the module's list- 
>; 4729 0 : ing Line numbers are Lined up with the source files and record numbers 
; 156 0 : within those source files. The available commands are described indi- 
3 4731 0 ; vidually below. 
; File Correlation commands needed to fully describe the 
; i 3 eevent eed vite not fit in a single Source Line Correlation DST 
> 4735 0 : record, rt —— be soreas over —A a cat thee’ conan 
: e processed sequentially, . 
; cr3? 0 intl there are RO more such records tor the current module. 
4738 0 : 
; f the Source File Correlation commands is to allow DEBUG 
338 ——238 correlations between Line numbers and source 
s 6676; : records. A “‘Line number’’ in this context means the Listing Line num- 
: 474 ! ber. This is the Line number which is printed in the program tating 
; 170 0 : and is output to the PC-Correlation DST records by the comptier. (PC- 
: 4746 0 : Correlation DST records correlate Listing Line numbers with Program 
: 6745 0 : Counter values.) A corresponding source Line is identified ie 
; rte 0 things: a source file and a record number within that source e. 
: i i f the Source File Correlation commands can be understood 
; rte 0 i — aurea a) nenteanton three state variables and issuing one command. 
; $720 The three state variables are: 
4751 : 
: i NE_NUM == The current Listing Line number. 
: 1738 SRC FILE -- The File ID of the current source file, 
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i.e. a small integer uniquely defining 
the source file. 

SRC_REC — The record number (in the RMS sense) in 
the current source file of the current 
source Line. 


LINE NUM is assumed to have an initial value of 1 while SRC_FILE and 
SRC_REC are initially undefined. The one command is: 


DEFINE(LINE_NUM, SRC_FILE, SRC_REC) 


This command declares that Line number LINE_NUM is associated with the 
source Line at record number SRC_REC in the file specified by SRC_FILE. 


Given this, the compiler must — a sequence of Source File Correla- 
tion commands which cause LINE_NUM, SRC_FILE, and SRC_REC to be set up 
appro ang 3 7 and which cause the proper DEF INE operations to be issued 
to allow DEBUG to generate the correct Line number to source record 
correlation table. (DEBUG may not — generate the full table, 
but it must be able to generate ~ part of such a table it needs.) 

The semantics of each Source File Correlation command is described 
below in terms of these state variables and commands. 


Line numbers must be DEFINEd in sequential order, from lowest Line 
number to highest Line number, in the Source File Correlation commands 
for one module. The source records these Line numbers correlate with 
may be in any order, of course. 


It should be clear from what follows that the source for one module may 
come from many source files. This can be caused ~ plus-lists on the 
compiler command (e.g., SFORTRAN/DEBUG A+B+C) and by INCLUDE statements 
in the source. Also, source Lines may come from modules within source 
Libraries as well as from independent source files. 


Form feeds in source files, or more precisely source file records which 
contain nothing but a single form feed (CNTL=-L) character, are counted 
as individual sources lines in some languages but are ignored (not as- 
signed Line numbers) in other languages. DEBUG will handle either con- 
vention, but DEBUG's default behavior is that form feed records are 
ignored in sources files. They are not displayed and they do not count 
toward the source file record number of subsequent source records. To 
2 DEBUG count such records, the DSTSK_SRC_FORMFEED command must be 
used. 


Define the location of the first command in the DST record. 
FIELD DSTSSOURCE_FIELDS ⸗ 
OS TSA_SRC_FIRST_CAD = (€ 2, A_ 1] ! Location of first command in record 
: Define the command codes for all the Source File Correlation commands. 
LITERAL 


: 0 
5 
i; HHS 
; 0 
: 0 
: 0 
: 0 
9 
: 0 
: 0 
: 0 
; 0 
: 0 
: 0 
; 0 
: 0 
: 0 
: 6782 0 
: 0 
9 
; 0 
; 0 
: 0 
; 0 
: 0 
: 0 
8 
0 
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11 DSTSK_SRC_MIN_ CMD = 1, ! Minimum command code for uo ranges 
i Da tee eRe -DECET ILE = 1, ! Declare a source file for this wey ule 
1 DSTSK-SRC"SETFIL = ¢: ' Set the current source file (word 
14 DSTSK_SRC_SETREC_L = 3, ! Set source record number (lon — 
15 $2b RR es he = 6 ! Sets e record number (word) 
1 DSTSK_SRC_SETLNUA_L = 5, ! Setlt st ng Line number (longword) 
1 DSTSK_SRC_SETLNUM_W = g. ! Set listin Line number (word) 
\8 DSTSK_SRC_INCRLNUA_B = 7, ! Increment listing Line number (byte) 
1 : = 8. ! Unused--available for future use 
0 : = 9, ! Unused--available for future use 
1 DSTSK_SRC_DEFLINES_W = 10, ! Define N separate Lines (word) 
¢ DSTSK_SRC_DEFLINES_8 = 11, ! Define N sepersre ganes (byte) 

! = \¢° ! Unused--available for future use 
4 ! = 15, ! Unused--available for future use 
5 : = 14, ! Unused--available for future use 
— = 15, ! Unused--available for future use 

DSTSK_SRC_FORMFEED = 16, ! Count Form-Feeds as source records 
DSTSK_SRC_MAX_CMD = 16; ! Maximum command code for CASE ranges 
0 
1 ! Define the fields of the Source Line Correlation commands. Also define the 
§ corresponding declaration macros. 


FIELD DSTSSRC_COMMAND FIELDS = 


5 
' 

3 Field common to all Source File Correlation commands. 
859 DSTSB_SRC_COMMAND =€0, 8.1),  ! Command code 
841 The fields of the Declare Source File command. 
Be DST$B_ SRC_DF_LENGTH =(€1, 6.], ' Length of this command 
844 DST$B_SRC_DF_FLAGS = ¢- 7. oe ! Flag bitsrereseryed (MBZ) 
845 DSTS$W_SRC_DF “FILED = 16 2. ! Source file's File ID 
846 DST$Q"-SRC_DF_-RMS_CDT =(5, AL], ! Creation date and time or mod- 
847 ‘ ule insertion date and time 
848 DSTSL_SRC_DF_RMS ~fBK = 13. L_]. ! End-of-File block number 
849 DSTS$W_SRC_DF_RMS_FFB =(€17, WJ, ! First Free Oyte in EOF block 
850 DST$B_ =SRC_DF RAS» RFO =(€19, B. J, ! Record and File Organization 
$e) DSTSB_ F-FILENAME = ST. B. J, ! Source file name counted ASCII 
£26 DSTSA_ one “DF-FILENAME = ts A De : (count byte, string addr) 
Bee Fields used to access information in all other commands. 
856 DSTSL_SRC 2*28 ef}. t. 2 } Uns igned Lonquerd parameter 
85 DST$W-SRC_UNSWO ={1,W- ), i Unsigned word parameter 

58 DST$B- SRC ~UNSBYTE =({ 1, 8. i Unsigned byte parameter 

59 TES; 

1 
3 Declare trailer field in the Declare Source File command. 


FIELD ii DECLFILE_TRLR_FIELDS = 


STSB_SRC_DF _LIBMODNAME = f 0, B }: ! Module name counted ASCII 
DSTSAT SRC"DF-LIBMODNAME = [ 1, A_ : (count byte, string addr) 
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; & TES; 

P 4 

; ¢ nh : Declaration macros for Source File Correlation command and trailer blocks. 

; 6 of MACRO 

; 68746 per eenc cones = BLOCK( BYTE ELBE DSTSSR aS conan, FIEL es) i, 

; 6875 DSTSSRC_CMD TRUR = BLOCK ‘BYTE LELD(DSTSSRC_DECLFILE_TRLR_FIELDS) 2%; 
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dyte 
byte 
byte 
word 
quad 
long 
word 
byte 
var 


var 
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DECLARE SOURCE FILE (DSTSK_SRC_DECLFILE) 


This command declares a source file which contributes source Lines to 
the yy: L module. It declares the name of t * file, its creation 
date and time * various other attributes. 7 command also assigns 
a one-word ‘file to this source file. ints 5 


the format of the 
Declare Source Fi ; command: 


deme n wenn em — ewe te emo wee BeBe eS Se Seo eseanwmeevewtananranaaanccnserane + 


' DBGSB_SRC_COMMAND (= DSTSK_SRC_DECLFILE) ' 


4 


DSTSB_SRC_OF LENGTH ' 


4 


DSTSB_SRC_DF_FLAGS 


eee ecocoen seat e Peewee seme ener ron enn eae een wn anrsren we ant amnrecanenrewrocane= $ 


' DSTSW_SRC_OF _FILEID ' 


PAM EDO TEM DA SEBO ESTO DSN BeBe san nwaon Oana nnonaensnacunasanscas $ 


DST$Q_SRC_DF_RMS_CDT 


teow ee mote mene era mee Ene ne CHS eB DEA DTHESeSTSs ese Be aceowaomnoannaaneseee $ 


DSTSL_SRC_DF_RMS_EBK 


ewer Bee e SD eee Bee Be Se Sees Seen Seon eereoeenennanaaans > 


DST$W_SRC_DF_RMS_FFB 


OOS ME ODED B ROEM OBEN DOES ROO Tee Sacre wDoewraca ne norvcaesmaremauweas 4 


DST$B_SRC_DF_RMS_RFO } 


$ewneaneseesceansucessae Sete e Ze et one Z eee eB BS Be mB Tees ene re wBDeneZz sere e + 


: DSTSB_SRC_OF _F ILENAME H 


fp ae om ee Om me Oe er ae Oe RD ON nO Oe ER ROO RE MO SE OO So Dea eS 


} DST$B_SRC_DF_LIBMODNAME 


¢wwmmeonnerocoaenr nm neon eec — — see a wm meaeneremoawoe esate as + 


The fields in this command are the following: 


DSTSB_SRC_DF_LENGTH = The Length of this command, i.e. the number of 
bytes remaining in the command after this field. 


DSTSB_SRC_DF_FLAGS - Bit flags. This field is reserved for future use. 
At present this field Must Be Zero. 


DSTSW_SRC_DF_FILEID = The one-word ‘File ID°’ of this source file. This 
File 1D, which can later be used in the Set File command, is 
4A : unique number which wf compiler assigns to each source 
file Yn ch contr ibutes source : nee, o the current module. Each 
source file th us has a number ( le 1D) and is identified by 
that number in the Set File (DStSe gre _SETFILE) command. 


DST$Q_SRC_DF 8. CDT = The greetion date and time of hts ource file. 
This quadword quantity should be rete eves with XABDAT 
extended attribute block from RMS via the SOPEN or SDISPLAY 
system service. The creation date pe Pie tiae should be taken 
from the KABS$Q_CDT field of the XAB. 


If the source file is a ule in 28 Source Library. this field 
should contain the module's Insert Bete in the Lib- 
rary. This value should be retrieved with —8 i. MODULE 


öOOOOIOOIOOIOOIOOOIOOOIOOOIOOOIOOOOIOOOOOOOOOIOOOIOOCOC)OOIOCOIOOI)OCOOIOOCOOIODOOI 
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Librarian call. The Library file's creation date is not used. 


DSTSL_SRC_DF PMS. BK = The End-of-File block number for this source 
tTle fis Lenquere quantity should be retrieved with a 
SHASENC. extende ett {ute block from ot via the SOPEN or 
SDISPLAY system servi so. e End-of-File block number should 

be taken from the XABSL_EBK field of the xXAB. 


This field should be zero for modules in source Libraries. 


DSTSW_SRC_DF ws FFB = The first free byte of the End-of-File block 
for ate source file. This word quant ty should 7. retrieved 
with MABFHC extended attribute block from RMS via the SOPEN 
or SDISPLAY system service. The first free byte —* should 
be taken from the KABSW_FFB field of the XAB. 


This field should be zero for modules in source Libraries. 


DSTS$B_ - DF _RMS_RFO = The file organization and record format * this 
Ourte file. This byte value should be retrieved with 
SXABFHC extended attribute block from RMS via the SOPEN. or 
SDISPLAY system service. The file organization and record 
format should be taken from the XABSB_RFO field of the XAB. 


This field should be zero for modules in source libraries. 


DSTSB_SRC_DF_FILENAME = The full filename of the source file. This is 
the Tully specified filename, complete with device name and 
version number, in which all wild cards and logical names have 
been resolved. This string should be retrieved with a SNAM 
block from RMS via the SOPEN or SSEARCH system service. The 
desired string is the —28—— md specified by the 

RS RSS, and NAMSB_RSL fields of the block. 
Here the file name is representéd as a Counted ASCII string la 
one-byte character count followed by the name string). 


DSTSB_ or * LIBMODNAME - The geures Rng A module name (if applicable) 
the null string. If t is ectual ly a module in 
. source library, the DSt$s. src _DF Rate fi set". * the 
filename of the source Library and the D BMOD 
field Gives. one name i. the source pow Dy wi thine that Library. 
If the $ not come from a source library, this 
field — SF — contains the null (zero-length) 
string. This fiéld is represented as a Counted ASCII string. 


——~4 


— 


4998 
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00000000 
2a to 222 
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byte 
word 


byte 


long 
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SET SOURCE FILE (DSTSK_SRC_SETFILE) 


This command sets the current source file to the file denoted by the 
one-word file ID given in the command. The set file is then the file 
from which further source Rh are — when the corresponding List- 
ing Lines are defined. tne loract of the command: 


Pee RSME BB ED OE Beer ween eDnomaenmene one a es Seon sesnssreensenen2onomes > 


' DBGSB_SRC_COMMAND (= DSTSK_SRC_SETFILE) ' 


4 


: DSTSW_SRC_UNSWORD: The File ID of the desired source file H 


woe cwoccanas aeeenseesenenecousesenesce — as eens aoaesterzen eeececece * 


The semantics of this command is: 


SRC_FILE := file ID from command 
SRC-REC := set to current source record for this 
source file 


SET SOURCE RECORD NUMBER LONG (DSTSK_SRC_SETREC_L) 


This command sets the current source file record number to the longword 
value specified in the command. Its format is: 


See eee eee eeneoene SSeS oenenenenee — n oar nance nana mes + 


DBGSB_ SRC_COMMAND (= DSTSK_SRC_SETREC_L) ' 


—— — — —— —— —— — 000008 —— wo mee oe >} 


DSTSL_SRC_UNSLONG: The desired new source record number 


—— +--+ 


The semantics of this command is: 
SRC_REC := longword value from command 


RCOSTRECROS REO: iat ts 


113 


—_—, 


fei RAL MEU Te eta SRCIDSTRECRDS. —B 


SET SOURCE RECORD NUMBER WORD (DSTSK_SRC_SETREC_W) 


14 
5) 


— —2 


VEN o —⏑ 


This command set the current source file record number to the word 
value specified in the command. It is thus a more compact form of 
the DSTSK_SRC_SETREC_L command. Its format is: 


SSS ORO SESE SAMO DET SSH SMOTHER OTH STO STH SHEOESKSDOE RM HSE ODEN Eoeserweman > 


byte ; DBGSB_SRC_COMMAND (= DSTSK_SRC_SETREC_W) H 
word ; DSTSW_SRC_UNSWORD: The desired new source record number : 


Peweeeeesosooesooceccousscusecesssesoooeseesssesneeseecececceccce + 


The semantics of this command is: 
SRC_REC := word value from command 


CGOOCOCCCOCSC COCO OOOOOoOoOoOoooO 
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8 SET LINE NUMBER LONG (DSTSK_SRC_SETLNUM_L) 

041 

ek This command set the current Listing Line number to a longword value 
Ber specified in the command. Its format is: 

045 

ot byte : DBGSB_SRC_COMMAND (= DSTSK_SRC_SETLNUM_L) : 
Rep long H DSTSL_SRC_UNSLONG: The desired Listing Line number : 
051 

628 

8 The semantics of this command is: 

055 LINE_NUM := Longword value in commmand 


byte 
word 


byte 
byte 


lt Ret ee ee ee ee ee i oe? ee te ee? te ee te te te te te te te te te ee 


ae 50108 vars 


SET LINE NUMBER WORD (DSTSK_SRC_SETLNUM_W) 


This § and sets the current *22 hy number to a one-word value 


specified in the command. Its forma 


$0 06S CSCS SSS SSSSSSSSSSSSSSSSSSSSSSSSSSESSESSSSSSSESSSSESESESEES + 


H DBGSB_SRC_COMMAND (= DSTSK_SRC_SETLNUM_W) ' 


Goeceeeevesoesesesoeeseesosoossesesesesesosesseseoseosescosoosce > 


: DSTSW_SRC_UNSWORD: The desired Listing Line number : 


————— + 


The semantics of this command is: 
LINE _NUM := word value in command 


INCREMENT LINE NUMBER BYTE (DSTSK_SRC_INCRLNUM_B) 


This command increments the current Listin ae number by a one-byte 


value specified in the command. Its format is: 


oer tem cee war ee 2 OEE EDOM Ewen nrnonaemannea d 


' DBGSB_SRC_COMMAND (= DSTSK_SRC_INCRLNUM_B) ' 


à— —— — — — + 


: DSTSB_SRC_UNSBYTE: The desired Listing Line number increment : 


| Feta, fe ER ile tet Ss Dam, Then 


The semantics of this command is: 
LINE NUM := LINE_NUM ¢* byte value in command 
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COUNT FORM-FEEDS AS SOURCE RECORDS (DSTSK_SRC_FORMFEED) 


This command specifies that DEBUG should count source records which 
consists of nothing but a Form-Feed character (CNTL-L) as being 
distinct, numbered source records, In gone languages, such records 
are not gone iéer d to be source Lines; instead hey ore regarded as 
control information. The compiler then does not assign Line numbers 
to them and DEBUG ignores them completely-- Rey are not displayed 

as part of the source and they do not contribu $ to the source record 
number "9 of source files. However, if the DSTSK_SRC_FORMFEED command 
is specified in the Source File Correlation DST Record for a module, 
then such records count as normal records; they can be displayed and 
they are assigned source file record numbers. 


If used, this command must appear before any commands that actually 
define source lines. Making it the first command in the first 
Source File Correlation Record for the module is a good choice. 


¢wwowmme seme enr ———— — osrenwtensasae age eres renecaesaeaseaa + 


DBGSB_SRC_COMMAND (= DSTSK_SRC_FORMFEED) ; 


$e ece ream socwm nsec te eee ee eas eee on none neoreeronwre mara ananscansad 


The semantics of this command is to set a mode tog which says to 
count Form-Feed records as normal records. The default behavior 
is to ignore Form-Feed records. 


1 
7 


6 
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byte 
word 
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byte 
byte 


DONO VFSWN OONO UE WO 0 


WN — 


7 
ae oe oe ee ee ee TD — — — — — — —— — I — — — —— — —— — i — — — — — — — — — —— —— 


ù—————————————⏑—⏑—⏑⏑˖—⏑j⏑——— ———— ⏑ — 


— — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — — —— 


SSS FF eS SSE eos SESS 


öOSOSOSOOIOOOODOOOISOOOOOOODSOOSOSOIOIOISOCOOSOOOOOSOOOOOOOOOOOOOOOOOOOOICDDSOOOOO 


VE 


i END OF 
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DEFINE N LINES WORD (DSTSK_SRC_DEFLINES_w) 


This command defines the source file and source record numbers for 
a specified number of Listing Line numbers. The specified number is 
given by @ one-word count in the command. The command format is: 


— SOU 2 — — — TAO — — — — — —222 


DBGSB_SRC_COMMAND (= DSTSK_SRC_DEFLINES_W) 


Pee sO Se SSH SH BSED SOD RSEHBS HE SOSTMTHTDSOS DETR ONEeEDE men emacs senmanensnaad 


H DSTSW_SRC_UNSWORD: The number of Lines to define H 
The semantics of this command is: 
DO the mabe of times specified in the command: 
DEFINE(LINE_NUM, SRC_FILE, SRC_REC); 
NE_NUM™+ 1; 


L NUM := 
SRC_REC := SRC_REC + 1; 
END; 


DEFINE N LINES BYTE (DSTSK_SRC_DEFLINES_8) 


This command defines the source file and source record number for 

a specified number of Listing Line numbers. The specified number is 
given by a *311 count in the command. This is thus a more compact 
orm of the DSTSK_SRC_DEFLINES_W command. Its format is: 


Pee wearer no amram meer 2 DOE —— ————2 


DBGSB_SRC_COMMAND (= DSTSK_SRC_DEFLINES_B) ' 


ft ewoemamowow meas — aren mare e sane nea ana Dnarowacwsacronmonnaesnomeaemanae + 


: DSTSB_SRC_UNSBYTE: The number of Lines to define : 


pow sna ree — eeeoeoe eeoeeeon + 


The semantics of this command is: 


DO the meee of times specified in the command: 
DEF INE (LINE _NUM sac Fite. SRC_REC); 
LINE NUM :="LINE_NUM™+ 1; 
Shc REC := SRC_REC ¢ 1; 
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THE DEFINITION LINE NUMBER 
DST RECORD 


— 


— 


NOTE: THIS DST RECORD IS NOT SUPPORTED BY DEBUG V4.0. 


! 

1 

1 

1 

1 

1 

1 

' 

! The Definition Line Number DST record spec it tes the Listing Line number 

: at which a data symbol or other object is defined or declared. The 

! intent is to make use of this information in future DEBUG commands so 

: that a yser can see the declaration source i for a specified symbol. 

é The Definition Line Number DST record must immediately follow the data 

ots recere of the data object whose Line of definition is being speci- 
ed. 

' 

1 

1 

1 

1 

1 

1 

1 

' 

1 


This is the format of the Definition Line Number DST record: 
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' 
' 
' 
i 
' 
i Define the fields of the Definition Line Number DST record. The unused byte 
} in the DST record is reserved for future use. 
FIELD DSTSDEF_LNUM_FIELDS z 

OSTSL DEF _LWUM_LINE = (€ 3, L. J] ! The definition Line number 


oo 
3888 
SOSOSOSSOOSOSSOSSOSCOOCOOOOOCOOOOOOOOOOOOOOoOOoOO 
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THE STATIC LINK DST RECORD | 


The Static Link DST record specifies the ‘Static Link’’ for a routine. 
The Static Link is a po nter to the VAX call frame for the ereper up- 
scope invocation of the quter routine within which the present invoca- 
tion of the present routine is nested. The Static Link is thus used 


> — 4 — — 


0 — 


when DEBUG does up-level addressing in response to user commands. 
Static Link DST Record is always associated with the inner-most routine 
within whose Sous snenaeg is ang Routine-End records it is nested. The 
Static Link DST Record is optional--it need not be * by Languages 

or for routines which do not keep track of static Links in their run= 
time environments. In fact, the Static Link DST record only makes a 
difference for recursive routines that pass routines as parameters, a 
fairly obscure situation. 


This is the format of the Static Link DST record: 


FUSVSUSVSIUSISUSISVSIIS 
WAIN 


Fu 
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byte | DSTS$B_LENGTH 


power eaaneocee eeeeoeoeoeoe See eernwnZ eZ ZF Teas eoeweeerzr eee wero awerec = — ——— ——— + 


byte H DSTSB_TYPE (=DSTSK_STATLINK) : 

etc @e ae rernr rer ese ww BB Bw Bk sve ee ws se See wee were ee wee Soe wa = w= wee aaca oom + 
DSTSA_SL_VALSPEC 

A DST Value Specification Giving the Value of the 


Static Link, i.e. the FP Value of the Routine Invocation 


2888 


Ww 


var 


Statically Up-Scope from this Scope 


@ cece ce cess cccsccce 


VEEL 


Define the fields of the Static Link DST record. 
IELD OSTSSTATL INK FIELDS = 


DSTSA_SL_VALSPEC =(€2, A, ] ' Location of Value Spec giving 
1ES : the up-scope FP value 


' 
i 
i 
i 
i 
i 
i 
! 
; 
i 
i 
i 
‘ ewe eee cree me oe BEEBE ROE EDO EOE SSEDEaDeawae sr eeeceoe Seer sao wrnewrewreoe + 
' 
; 
i 
‘ 
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THE PROLOG DST RECORD 


The Prolog DST record tells DEBUG where to put routine breakpoints. 
It is used for routines that have prolog code that must be executed 
before data objects can be freely examined or otherwise accessed 
from DEBUG. Such prolog code typically sets up stack locations and 
descriptors for formal parameters or other data objects. By putting 
routine breakpoints on the first instruction after the proces code 
as specified in the heh te DST record, DEBUG ensures that al local 
storage and formal parameters are accessible to the user. 


Prolog DST records are optional. If omitted for some routine, DEBUG 
simply uses the routine start address for routine breakpoints or 
tracepoints requested by the user. If specified, the —* DST 
record is counted as belonging with the nearest Rout ine Begin or Entry 
Point DST record before it, not counting nested routines. Placing 

the Prolog DST record immediately after the Routine Begin or Entry 
Point DST record with which it is associated is good practice. 


This is the format of the Prolog DST record: 


derma oceorsacen Heenan rome em ee coe wee ee worsen oon Om memes Be an OS mw Oo we oe we on $ 

byte | DSTSB_LENGTH (=5) 

: 42222 eee ree nee em ne ee eww ewe sem meno ce wee en nen ee wen em wre eee ewe 222224 
! byte : DSTSB_TYPE (= DSTSK_PROLOG) H 
long : DSTSL_PROLOG_BKPT_ADDR : 


seers ee eww ewre ner eso wmnneenaecaansre neocon weoaae Se eee ee eee eeoeoeonoeeeene + 


Define the fields of the Prolog DST record. 
IELD OSTSPROLOG_FIELDS = 
| gl ta petal tana etd 4. 2 ! The routine breakpoint address 


1" 
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THE VERSITON NUMBER DST RECORD 


The Version Number DST record gives the version number of the compiler 
that compiled the current module. The Version Number DST Record must 
be nested within the Module Begin and Module End DST Records for the 
module in question. ae ignores this record except in special cases 
when it is necessary to distinguish between old and new versions of the 
compiler that generated a given object module. 


This is the format of the Version Number DST record: 


fewer eect — ew — 2 2 2 oe as emo omnes as ees 22 


byte : DSTSB_LENGTH (= 3) ' 


een Oe OO s Senne Dew ET Be PSB 2 BO Seen sB ener aesoanenaenoaae = y 


byte ; DSTSB_TYPE (= DSTSK_VERSION) ' 


domme enema rarer — — — — wer — ane en ewer are rere omer eenr seman caewes $ 


byte | DSTS$B_VERSION_MAJOR 


wen sense tre 2— nese s san rae tres one mn em ewer eo emer eanwoet me wmewrenaea = ¢ 


byte : DST$B_VERSION_MINOR 


Foe rer ewer ec eon oe wee ene ewer ewr een ec wwoe cnr e ne oer ere wren wane wr eoor en waacan = —— ———— 


Define the fields of the Version Number DST record. 
FIELD DSTSVERSION_F 1ELDS = 


DST$B_VERSION_MAJOR 


& 1 z 8.1. Ihe major version number 
+ he ee aan 7 j 


! The minor version number 


PUPP IV DVIUDV IVD IVIVPUDPISUSVLUSVLUSVUSVSIVUSUSVSIVSISIS ISIS 


WANAW AWN 
öOO0000000000000000000000000000000 


233öö 


à—⏑ ⏑ ⏑ — — — ———— Oe 


— — — — — — — —— — — —— — — — — — 


mm me Be Oe Oe Be Be Oe Be Be Be Be OO BH Gs Gs Be Ge Be Se Ge Se Ge Ge Se Ge Ge Ge Be Ge Be Ge Ge Ge Ge Ge Ge Ge Se Se Ge Se Ge Ge Ge Se Se Se Se oe 


owo 


PAAAAAMVIMN & 


iw 


DPEDPVPVDPVPUDVSVSVSVSSVSISISISI SSSI 


SOWONOVEWN “OD ONOUS wn 
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byte 
byte 
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THE COBOL GLOBAL ATTRIBUTE 

DST RECORD 


The COBOL Global Attribute DST record indicates that the symbol whose 
DST record lanediately follows has the COBOL “‘global’’ attribute. This 
attribute spec tt tes that the symbol is visible in nested COBOL scopes 
(routines) within the scope (routine) in which the symbol is declared. 
Without this attribute, a symbol is only visible in its scope of decla- 
ration but not within any nested scopes. In this regerd. C 4* differs 
from most other sengueges. DEBUG thus needs to know this attribute in 
order to implement the COBOL scope rules correctly. 


The COBOL Global Attribute DST record is only generated by the COBOL 
compiler. If it precedes the DST record for some symbol, that symbol 
is deemed to have the COBOL global attribute; if it omitted, the sym- 
bol is deemed not to have the global attribute. DEBUG ignores this 
attribute for all other languages. 


This is the format of the COBOL Global Attribute DST record: 


¢ cee ems ets eee ne Dee eee te EMD Dow wMeS DE wBeBeEBTDo BEEBE Z ESB EB ems ee seeeeoeneoe + 


DSTSB_LENGTH (= 1) 


Fee OREO EH OO ODE MOBI TAI S OK eE MOBO MEE OE DOM ee eowwrawnnonwanoe nen aws + 


' DSTSB_TYPE (= DSTSK_COBOLGBL) ' 


ewe nese scenee — 2 ses asec ease nea aw eener ease se ee ese eee s eee ae eeeeeoe +e 
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7 


em 


byte 
byte 
byte 


var 


word 


var 


03 
of 
09 


! 
| 
: 
0 


re Te ee ee ee te ee ee ee — —— — — — — — — — — — — — — — — — — es te te te te te et Le 
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THE OVERLOADED SYMBOL DST RECORD . 


NOTE: THIS DST RECORD IS NOT SUPPORTED BY DEBUG v4.0. 


The Overloaded Symbol DST record is weer to indicate that a given 
symbol name is overloaded. The record indicates which other symbols 
in the DST are possible resolutions to the overloading. It is used 


““by the ADA compiler. 


n ADA, it is possible to have more than one routine of the same name 
n the same scope. If the routine name is R, DEBUG disambiguates the 
individual instances of the overloaded routine name with the invented 
names R__1, R_ R_.5, and so on. DEBUG requires the ADA compiler to 
generate normal bsT"Fecords for these routines, using the invented 
names. DEBUG also requires the ADA compiler to generate the Overloaded 
Symbol DST record with the original overloaded name ‘‘R'’ in order to 
inform DEBUG of the overloading. 


After the length and type fields, this record contains a Counted ASCII 
string with the name of the overloaded symbol. Following the Counted 
ASCII string, there is a word field containing a count of the number 

of overloaded instances of the name in this scope. Next there is a 
vector of pointers, one for each instance, pointing to the DST records 
for the instances of the overloaded symbol. These DST pointers consist 
of byte offsets relative to the start of the whole DST. 


This is the format of the Overloaded Symbol DST record: 


Gerace aaa eeeceoe SS SSSSSSSSSSSSSSSSSSSSSSSSSSVSSSSISSSSSSSSISOSS“ISISISISISSOSOS > 


' DST$B_LENGTH i 


¢ our nen oeaw nner nor en eres n aon ete oes See eeoeeoeeneaeoa Se eee eonenoenoneneaao + 


' DSTSB_TYPE (= DSTSK_OVERLOAD) ' 


Peo eee aa owremn es —— —— —— — —— 2 2 — — — — — 222— + 


DST$B_OL_NAME 


teres or esses eae nee eee ee eee ses ee eee eSeeeoeoeonoeoeoe See eee een eaeneanea 


The Overloaded Symbol Name in ASCII 
(The name's length is given by DST$B_OL_NAME) 


DST$W_OL_COUNT 


DSTSA_OL_VECTOR 
A Vector of Longword Pointers to the DST Records 


—4 oe 


of the Symbols with Invented Names that Constitute 
the Instances of this Overloading 


——— — — 


' 
‘ 
' 
' 
‘ 
‘ 
' 
‘ 
' 
‘ 
' 
' 
' 
' 
' 
4 
‘ 
' 

+ 


— — 
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Define the fields of the Overloaded Symbol DST record. 
FIELD OSTSOVERLOAD FIELDS = 
ztlis -OL.NAME =([( 2, 8B. ], 
DSTSA_OL_TRAILER= ( 3, A_ J 
TES; 


Count byte of the exer ected symbol 
name Counted ASCII str 

The trailer fields start at this 
location + .DST$B_OL_NAME 


! Define the fields of the Overloaded Symbol DST record trailer portion. Also 
define the corresponding declaration macro. 


FIELD BST evens. TRLR_FIELDS = 


DSTSW_OL_COUNT = fo Ae 3 ! Number of instances in this scope 
DSTSA_OL_VECTOR = i Vector of DST pointers to instances 
Tes i of overloaded symbol 


MACRO 
DSTSOVERLOAD_TRLR = BLOCKC BYTE] FIELD(DSTSOVERLOAD_TRLR_FIELDS) 2%; 


! This is a short BLISS example of how the trailer fields are accessed: 


LOCAL 
DsTPTR: REF DSTSRECORD, 
OVERLOAD “TRAILER: 
F BSTSOVERLOAD. TRLR, 


' 

1 

' 

‘ 

Pointer to DST record 
1 

' 

: OVERLOAD VECTOR: 
i 

1 

1 

1 

‘ 

1 

1 


The number of overloadings 
Pointer to DST record trailer 


Vector of DST-record pointers to the 
instances of this overloading 


REF VECTORE, LONG); 


Here we assume that DSTPTR points to the Overloaded Symbol DST record. 


OVERLOAD_ phy = — gn OL TRA an} + ,DSTPTRCDSTSB_OL_NAME); 
OVERL -OVERLOAD_TRAICERTOST$B_OL_COUNT); 
OVERLOAD” VECTOR = OVERLOAD TRAILERCOSTSA_OL VECTORS; 


öOSOSOSOSOOIOOOOOOOOOODOSOOIOOIDOCOOIOOIOOCOOOOOOO 


— —ñ —ñ —— — 


wi 


ww 
SONOARUN—OSBUTAR 


PPPPAAAAAAA 


"1 
1$-$ep-1964 330 btF | Bass DUAR coseuc: suc iostrecans.reaet@* (143 
CONTINUATION DST RECORDS 


When the text of a Debug Symbol Table recerg is longer than 255 bytes, 
it is n Longer possible to hold that text in a single DST record since 
the DSTSB_LENGTH field cannot hold a value larger than 255. In this 
case it is necessary to generate the original OST record followed by 

as — ontinuation DST records as aopeseery fo hold the ust text. 

The or a nal DST record then holds at least 100 and at most 255 bytes of 
text. ach Continuation DST record consists of the standard two-byte 
header followed by the continued text of the original DST record. 


This is the format of the Continuation DST record: 


grote meow snatmemrenenmramrwrosve ss eecronmoneetesrameon eect awceoanaecaraccocoawceos + 


byte ‘ DSTSB_LENGTH : 
Leeann moana ees sane mec r De coe eee mown eon near eonemewe ramon os aa 
byte ‘ DSTSB_TYPE (= DSTSK_CONTIN) H 
Seen sete te ese eee one eH eee Te SB Oe Ome New oC ee B Owe ZE EE DT oTe eB wae ewowan $ 
var : H 


The Continued Text of the Previous DST Record 


' ' 
‘ ' 
‘ ' 
‘ ' 
' ' 
‘ ' 
‘ ' 
' ' 
' ' 
‘ ‘ 
' ' 
+ + 


DEBUG reconstitutes a continued DST record by concotenat ing the text 

of the first DST record with the text portions of its Continuation DST 
records. In effect, the first two bytes of each Continuation DST record 
are stripped out. se further interpretation of the DST text is then 
done on the concatenated copy. 


Certain kinds of DST records are not allowed to be continued with Con- 
tinuation DST records. These records are Module Begin, Routine Begin, 
Block Begin, Label, Label-or-Literal, Entry Point, sect, Line Number 
PC-Corre ation, and Source File Correlation DST records. In addition, 
DST records with fixed sizes, such as Module End and Routine End DST 
records, are not allowed to be continued. Line Number PC-Correlation 
and Source File Correlation DST records cannot be continued with Con- 
tinuation DST records, but one can have multiple ous records in one 
module; they can thus be continued, but through a different mechanism. 
The records that really need to be continued, such as Standard Data 
DST records and their variants (Descriptor Format and Trailing Value 
Specification Format records), Separate Type Specification DST records, 
and Type Specification DST records, can all be continued using the 
Continuation DST record mechanisa. 


Define the fields of the Continuation DST record. 
FIELD DSTSCONTIN_FIELDS = 


Vober SELF MGHLBLSESTHE AYE 257SBrmecans.ncolt* 36 


SET 
PpiSA.CONTIN = €2,A,] ! Address of continuation text 


Sei alh oR 
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OBSOLETE DST RECORDS 


There are several obsolete DST records. These are records that were 

at one time generated by compilers, but are no longer used by any cur- 
rent version of any Digital compiler. Some of these records were not 
properly thought out and were abandoned when it was realized that their 
intended uses could not be implemented. Others were at one time used 
and useful, but were generated by now-obsolete compilers. Such records 
are not generated by current compiler versions, and the capabilities 
mee grovtecd are now provided by more general mechanisms in other DST 
records. 


None of the obsolete DST records should be — by any future 
compilers, and their use will not necessarily be supported by DEBUG. 


THE GLOBAL-IS-NEXT DST RECORD 


The Global-is-Next DST record is now obsolete. It consisted of just the 
DSTSB_LENGTH byte and the DSTSB_TYPE byte. DSTSK_GLOBNXT was the type 
code. The purpose of this record was never properly thought out and 

no support for it was ever implemented. It should not be generated by 
any future compilers or compiler versions. 


THE EXTERNAL-IS-NEXT DST RECORD 


The External-is-Next DST record is now obsolete. It consisted of just 
the DSTSB_LENGTH byte and the DSTSB_TYPE byte. DSTSK_EXTRNXT was the 
type code. The purpose of this record was never pro erly thought out 
and no support for it was ever implemented. It should not be generated 
by any future compilers or compiler versions. 
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: 
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THE THREADED-CODE PC-CORRELATION DST RECORD 


564 
565 
68 This DST record is identical in format to the Line Number PC-Correlation 
68 DST record except that the record type code is DSTSK_LINE_NUM_REL_R11. 

* It was used by an obsolete COBOL coupler according fo legend’ (the memo- 
570 ries are a » neay by now). The idea was that the threaded code gene- 
571 rated by this compiler consisted of a vector of longwords where each 


longword contained the address 9 run-t support routine to call. 
Register R11 pointed to the beginning of this vector. The code gene= 
rated for # source line thus consisted of some number of longwords 
with addresses to call (or perhaps jump to--the exact dete ls are lost 
in the mists of time). The Line number PC-correlation information 
passed to bees consisted of Line nuaers correlated with byte-offsets 
relative to R (i.e., to the start o A threaded code). aye «hw 
n e 


were placed on a specified Line by loo 


ng up the correspond 
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relative to R11 and then qtoring an address within DEBUG into that 
location. When the location was reached, DEBUG was gateree. DEBUG 
could then convert the ‘PC’, i.e. the threaded-code location, back to 

a Line number to announce the arockoe tat . It is not clear how, or even 
whether, tracing, stepping, and watchpoints were implemented. 


The Threaded-Code PC-Correlation DST record is no longer supported by 
DEBUG and should not be generated by any current or future compilers. 


THE COBOL HACK DST RECORD 


The COBOL Hack DST record was at one time used to support formal argu- 
ments to COBOL procedures. It has now been superceded by the more 
general Value Specification mechanism, and is thus obsolete. It is 

no 9 generated by the COBOL com filer, and it should not be gene- 
rated by any current or future compilers. Future versions of DEBUG 
may not support it. 


The fields of this record consist of the fields of the Standard Data 
DST record followed by a type field that specifies the data type and 
then a sequence of commands for the DEBUG stack machine. (See the sec- 
tion on Value Specifications for details on the DEBUG stack machine.) 
The result of entorarst ing the stack machine routine is the address of 
the object described by this record. The DSTSB_VFLAGS and DST$L_VALUE 
fields are zero unless the object has a descriptor. In this latter 
case they specify the location of the descriptor. The result of the 
stack machine routine is placed in the DSCSA_POINTER field of the 
descriptor before it is used. In addition, Tf it is an array descrip- 
tor, the DSCSA_AO field is added to the result of the stack machine 
routine and the result is placed in the DSC$A_A0 field before the 
descriptor is used. 


SF 


mr 
SOOOSOSOOSOSOSOSOSOSSOSSSSOCSOOOOOSOOOOSOOOOOOOOO OOOO OO 


SSSSS2 


The type field following the name field contains the VAX Standard Type 
Code of the object be ing described here. If the object also has a 
descriptor, its DSCSB_DTYPE field must agree with this code. 


The stack machine commands used in this context are those described 
in the section entitled ‘The DEBUG Stack Machine’’ in the chapter on 
DST Value Specifications. 


This is the format of the COBOL Hack DST record: 


POPU PVPVDVLVLVSPUPUDVSV SV SIVSIVSUSVSVSTSISTSUSUSUSISISIS SIT 


PAAAPAAPASAAAAO 
ROPOPONY 2 tt ot ot ⏑⏑ü0 
WN SO o ⏑ — 


— 
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Define the fields of the Cobol Hack DST record. Also define the declaration 
macro for the trailer fields. 


IELD DSTSCOB_HACK_FIELDS = 


: 5 byte : DSTSB_LENGTH H 
6 $ ; byte: DSTSB_TYPE (=DSTSK_COB_HACK) : 
8 i byte : DSTS$B_VFLAGS i 
6 1 ; long ~_DSTSL VALUE i 
6 j byte } ~ DSTS$B NAME : 
635 ivyar | ; 
: The Name of the Data Symbol in ASCII ‘ 
6 8 (The name's Length is given by DST$B_NAME) 

eee | 

i Pee ees reece en esteem aa eon earn e en ne eee eames one man een OM a a + 

byte ‘ DST$B_ CH. TYPE 

‘var 3 DSTSA_CH_STKRTN_ADDR 

Instruction Sequence for the DEBUG Stack Machine 

J 

2 + 

1 

i 

i 

i 

i 

i 

F 


ais it Seana ss ssaa 3353 


SOOSCOCOOOSOSSOOSSOSOSSOSOSSOCSSOOSSCOCOCOOOOOOOCOOOOOOOOOOoOO 


Seren CORMACK PALA =(€ 8, AL] ! Location of trailer fields 
FIELD Osteen. TRLR_FIELDS = 

DSTSB_CH_TYPE = f 0, BL }. ! VAX standard data type 

persh. tH STKRIN. ADDR =(€ 1, AL ! Start of stack routine code 


Be Se Se Se Ge Se Se Be Se Ge Fe Ge Se Ge Ge Se Se Ss Se Se Ge Hs Ge Se Se Se Ge Se Se Se Se Se Se Ge Se Ge Ge Ge Se Ge Se Se Se Se Sees 


PUPP LV LVDVDVDVIVIVIVLIUDVIVIV IVI —⏑⏑— 


MACRO 


Sees 


DSTSCH_TRLR = BLOCKC,BYTE) FIELD(DSTSCH_TRLR_FIELDS) %; 
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VALUE SPECIFICATION DST RECORDS 


The Yejue Specification DST record contains nothing but a DST Value 


! 

i 

' 

J 
674 i —*8* cation. However, there appears to be no use for this record 
675 ; since all DST Value Specifications that are actually used appear in 
67 : ther DST records. This record was probably designed with some use 
67 ' n mind, but was then abandoned when better ways of addressing the 
67 ‘ original need were devised. DEBUG ignores this DST record, and it 
67 : is Believed that no compilers actually generate it. This 6ST record 
rey should not be generated by any future compilers. 
és This is the format of the Value Specification DST record: 
684 i 
e052 + 
rey] byte : DST$B_LENGTH : 
5689 i byte DST$B_TYPE (= DSTSK_VALSPEC) 
5690 477— 


var 


Define the fields of the Value Specification DST record. 
IELD OSTSVALSPEC FIELDS = 


DSTSA_VS_VALSPEC_ADDR = [ 2, A_ J ' The start location of the 
TES : Value Specification 


' 
F 


| 
By 
By 
BS 8 
i 


131 
79) 


COODOOOOOSOSOSOSOOSOSOSOSOSOSOSOSOSSOSOSOSOSOSOSOSOSOSOCOSOSOOSOSSOSOOSSOOSOOoSooO 


DOOM WVMINTMNOP- DOOM NUM TNOP DOO KUMI DOOK— MUM TNO DOOK— UM INO 
lel oe at ol a ol oh eh ek eh ee A a a a a a a) PVISVIA SF SF FFF TFT TNO 
LLL LRA RRRR RRR RRR RRR RRA RRA ALAR. 
Tele eel al al al aleal al alvalalalalralal alalralral slat al al al al el el eel eal el eal al al al allel a) 


~~ 
a 
is J 
eon 
Qs. 
o 
w 
a 
2 
ww 
a 
a 
vu 
w 
« 
— 
nn 
no 
vr 
nw 
‘a 
ow 
*e 
wo 
>a 
@ 
Cow 
Na 
=) 
Wee 
wo 
St BY 
— — 
— 
a 
— 
— 
wn 
=~ 
LA — 
> 1 — © 
©. cee = 
oO o- Boe . 
cm wa 
a ae enren +O 
on @ct~-eoa~ 
o- wow Oo@@e--tw® 
o* ee WA BH ue 
| — « we de. —— 
ow ecw #v0ae 
j oe ef = fr Ae tac w 
men - #se0r @& 
} curs VVRALav ~ 
j Qa @er Or 
} ws z &€ ttwv6@ 
i @o0o wevuvv wt 
j oo oO @ecevevw 
| —— #68 
822 — ev ouS 
aa ~—a -v | 
i -—e&e — Vv@-rcrevs 
'_ =—ww er vvvoe | 
me] <— oer ws ° | 
=u rou w 
| — « @®@c B8au~— ao] ) 
j SE ae — 
| << ow *®e ° 
| Owe eu rw) | 
] 2 — @s oOo a 
vw FF or . 
| =) -@8y Of | 
j AL Oe co - 
| [vv) z2~— OF wn” | 
| 2 otro oa — | 
| a an oe © a | 
~vurvv0e — I 
i* oew ce — w | 
a- @t.r to eo — 
a e-Eocoos@ rv j 
| wer Le Or ‘= “ 
i [4 a—~o vw~ o — 8 
e-neea - w - 
! Oo “ws ~~ oa — a } 
woUO-s 3 °o > . ° ° “ | 
| wv — touven . @ nr wm oe — | 
| ~@oevno re) J — avia . — J — — 
w @Qovnxt © @ Oo wm JO J _ uw Ww s3 ww 2 | 
| evouvt E ws eee es MO 2 VwoIwW YM OO 2a 32a MMOS ca | 
| L. 4 “oe Uy @ Im AMMMMOA IH BCmewe MA +1414 IMA0a0 ”“ i 
Be @e#@e35 c woe S2Ga0GGQQ4wWOQ ee OO IMWoOWOoWSO Jw | 
oO ewcou 5 ——————⏑— sae LO i —3— . ~ 
~auv7e 230 - SLID me em mn ie, a te, i a c=] . | 
| — ~Zoattr & — V=O00 Ss FPOuw swan b= = ewe 8 a e | 
sO 6 *+v «a Ou id jJuuuwu ue se Oovur>u EuZurnwu tt © x — 
w 2Cnaoaee rs + Qtuuw 6te es WorOu 89u ee Wad ° 2 
ows@ —€ 0 OS "OI OVO Ow I J a w2eZ<coww io ” - 
° taouca ~ Ween wwlwe—IOu>OOO<Or- WinxzIjaaes 3 a 
VvAa-nr - EO v ua te SSoyvoul ra eet t OBvow —- &mue-a [4 | 
eo-toe 6v @ EOQVM GAS SM MEE Qt ts we 25832 —2 —* 
Eevretcwnxe vo aw > OF & Sw se N= Ow a><izr> ve) ' 
Qa>euv eu =ruvar- SSSSALSBSSSS a Ss2S38RS ->uU = | 
} w ~— @« co DARDS: 4AM PY PD O® OF GD ? WD OF 04 OMA — 
“uw 8—— = a ~ | 
wt @-o@ 7 WMAMMNMNNMNMVMHMHVHVHHHUMHHHNHHHNHYNNMN rr" 
-acevorew * FECOOGHG]]]GVSV|HH|O|H|H|IHSIOQOPINI|VYV|SHIAIALHISS“DLE | 
— 
—* oO i 
- J 
— oo a 
oe « 2 
a ww a 
<= 
| = -. 
| 
' 
| EEEXEXELXXXELXXCXCXEXLECECEXXEXXLXEEXEXEEXEXXEXEXELELXEXECLXX K 


—ñ —— 


11 
1b-Sep-1986 23:01:08 VAX-11 Bliss-32 V4.0-742 Page 132 
; 7 Symbols ococecee Pages Processing 
: File Total Loaded Percent Mapped Time 
; _$255$DUA28: (DEBUG. OBJ JSTRUCDEF .L32;1 32 5 15 ? 00:00.1 
ie: COMMAND QUALIFIERS 
; BLISS/LIBRARY=LIBS:DSTRECRDS.L32/LIST=LIS$:DSTRECRDS.LIS SRC$:DSTRECRDS.REQ 


: Run Time: 00: 31-6 
3; Elapsed Time: 00: g-0 
3 Lines/CPU Min: 1091 

; Lexemes/CPU-Min: 7756 

3 Memory Used: 83 popes 

; Library Precompilation Complete 
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